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FOREWORD 


This  report  is  the  result  of  on  extensive  evaluation  of  Air  Force  Manual  100-24, 
Standard  Computer  Programming  Language  for  Air  Foce  Command  and  Control  Systems. 
The  evaluation  centered  on  user  experience  with  operational  JOVIAL  systems.  It  was 
accomplished  by  the  use  of  both  interview  and  questionnaire  techniques. 

The  work  has  been  performed  as  part  of  Project  6917  Task  04  under  contract 
number  FI 9628-68-C-Ol  1  0  for  Electronic  Systems  Division  U.S.  Air  Force  Systems 
Command.  The  project  monitor  was  Capt.  Martin  J.  Richter,  Hq  ESD  (ESLFE). 

The  report  contains  detailed  recommended  changes  to  AFM  100-24  In  Section  3. 

This  report  has  been  reviewed  and  is  approved. 
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MARTIN  J.  RIC 
Project  Moni 


JCtl 


,  Capt. ,  USAF 


WILLIAM  F.  HEISLER,  Col.,  USAF 
Chief,  Command  Systems  Division 
Directorate  of  Planning  &  Technology 
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ABSTRACT 


The  results  of  the  evaluation  of  the  JOVIAL  Language  as  specified  in  Air  Force 
Manual  (AFM)  100-24  are  contained  in  this  report.  This  evaluation  was  based 
primarily  on  experience  of  users  of  JOVIAL  Language  dialects.  The  goal  of  this 
evaluation  was  to  recommend  deletions,  retentions,  modifications,  and  extentlons 
to  the  JOVIAL  language  as  specified  in  AFM  100-24  based  on  the  users  experience. 

The  methodology  of  the  evaluation  consisted  of  collecting  user  experience  data  by 
means  of  a  "JOVIAL  Application  Questionnaire"  and  Interviews;  and  evaluating  this 
data  based  on  criteria  established  and  documented  in  the  "Approach  for  Change".  This 
report  contains  a  list  of  JOVIAL  features  recommended  for  deletion  and  retention  and 
detailed  specifications  of  recommended  modifications  and  extentions  to  the  JOVIAL 
language.  In  addition,  the  report  contains  the  detailed  interview  notes  and 
questionnaire  responses  which  were  the  basic  data  used  to  arrive  at  the  recommendations. 


Ill 


TABLE  OF  CONTENTS 


Page 

FOREWORD  li 

ABSTRACT  iii 

SECTION  I  INTRODUCTION  1 

1  . 1  Project  Overview  1 

1  .2  List  of  Features  and  Concepts  Considered  2 

1.3  Method  of  Analysis  6 

1  .3.1  Philosophy  of  Language  and  Language  6 

Standardization 

1.3.2  Method  of  Analysis  of  JAQ  Responses  8 

1.3.3  Method  of  Analysis  of  Inter  Responses  10 

SECTION  II  CONCLUSION  11 

2.1  JOVIAL  Language  Extention  11 

2.1.1  List  of  Extentions  1 1 

2.1.2  Remarks  on  Extentions  12 

2.2  Deletions  13 

2.3  List  of  Nucleus  Features  14 

2.4  List  of  Optional  Features  16 

2.5  Observations  17 

SECTION  III  EXTENSION  SPECIFICATIONS  19 

3.1  General  19 

3.2  Recommendations  19 

3.2.1  Deletions  19 

3.2.2  Additions  and  Modifications  20 

3.2.3  Nucleus  Features  77 

3.2.4  Optional  Features  79 

SECTION  IV  ADDITIONAL  RECOMMENDATIONS  81 

4.1  Specific  Study  Topics  81 

4.2  General  Concepts  81 

4.3  Specific  Concepts  81 

4.4  Language/Compiler  Design  Goals  82 

APPENDIX  1  Interviewee  Directory  and  Notes  83 

APPENDIX  II  JAQ  Feature  Resolution  and  Analysis  127 

APPENDIX  III  Interview  Questions  235 

APPENDIX  IV  Interview  Response  Analysis  253 


iv 


SECTION  I 


INTRODUCTION 


1  .1  Project  Overview 

The  JOVIAL  Evaluation  Project  consisted  of  a  study  of  the  Standard  Computer 
Programming  Language  for  Air  Force  Command  and  Control  System  (J3  dialect), 
as  specified  in  AFM  100-24.  The  goal  of  this  study  is  to  recommend  deletions, 
retentions,  modifications,  and  propose  extensions  to  the  features  of  the  Standard 
JOVIAL  language  dialect  as  specified  in  AFM  100-24  on  the  basis  of  command  and 
control  programming  requirements. 

The  study  has  been  carried  out  by  soliciting  information  from  a  community  of  users 
of  JOVIAL,  Members  of  this  community  were  selected  to  obtain  as  broad  a  cross- 
section  of  those  JOVIAL  command  and  control  programming  groups  as  possible. 

There  are  thirteen  members  in  the  community  canvassed  —  they  are  identified 
in  Appendix  1  .  It  is  important  to  note  that  several  of  the  military  members  are  non- 
Air  Force  and  that  the  list  also  includes  two  industrial  groups  using  JOVIAL  for 
non-military  applications.  It  is  felt  that  the  information  obtained  from  such  a  diverse 
community  has  produced  a  blueprint  for  a  "globally"  useful  command  and  control 
programming  language. 

Information  was  solicited  from  the  members  of  the  community  by  two  means: 

(1)  a  JOVIAL  Application  Questionnaire  (JAQ),  ESD-TR- 
and 

(2)  an  in-person  interview  conducted  by  DDL 

The  JAQ  contained  comprehensive  descriptions  of  the  features  defined  by 
AFM  100-24  with  questions  designed  to  determine 

(1)  deviations  of  the  JOVIAL  dialects  currently  in  use  from  the 
standard,  and 

(2)  the  degree  of  usage  of  those  features  which  did  not  deviate 
significantly  from  their  standard  counterparts.  (Respondents  could 
either  estimate  the  number  of  usages  of  the  feature  in  their  application 
or  give  an  exact  number.) 

Information  pertaining  to  hardware  configuration,  operating  procedures,  programmer 
experience  levels,  etc.,  were  also  solicited  in  the  JAQ.  One  or  more  copies  of  the 
JAQ  were  sent  to  each  member  of  the  community.  In  most  cases,  each  of  many 
sub-groups  of  a  given  user  group  responded  to  a  JAQ  .  Such  responses  were  made 
with  respect  to  the  particular  program  subsystem  for  which  the  sub-group  was 
responsible.  In  some  instances,  different  sub-groups  used  Different  compilers  (dialects); 
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in  other  instances,  the  same  compiler  (dialect)  was  used  by  many  or  all  of  the 
sub-groups,  (Note  that  "members  of  the  community"  or  groups  and  sub-groups  are 
alternately  referred  to  in  this  document  as  "applications".) 

Interviews  were  conducted  by  DDI  personnel  with  each  of  the  members  of  the 
community  to  determine  the  need  for  additional  features  to  the  language  and  the 
need  for  modifications  and  extensions  to  certain  existing  features.  Some  questions 
at  the  interviews  were  asked  in  order  to  gain  insight  into  broad  command  and  control 
programming  requirement  areas.  The  typical  Interview  lasted  for  approximately  three 
hours.  A  list  of  the  questions  asked  at  each  interview  may  be  found  In  Appendix  3. 
Respondents  to  the  JAQ  and  the  Interview  questions  were  generally  enthusiastic  and 
dilligent  In  providing  the  great  amounts  of  information  requested  of  them.  We  wish 
to  acknowledge  the  cooperative  efforts  of  all  of  those  who  participated  in  this  study, 

1  .2  List  of  Features  and  Concepts  Considered 

This  paragraph  contains  a  list  of  those  features  and  concepts  which  were  considered 
in  the  study  and  about  which  information  was  solicited.  The  word  "concept"  as  used 
here  refers  to  functions  performed  by  command  and  control  programmers  rather  than 
explicit  language  facilities  or  features.  Concepts  were  explored  during  the  Interviews 
along  with  certain  additional  features.  An  example  of  a  concept  is  "Dynamic  Storage 
Allocation".  It  was  the  point  of  the  Interviews  to  Identify  and  develop  features  — 
explicit  language  facilities  —  from  those  concepts  which  the  members  of  the 
community  thought  relevant  to  the  solution  of  their  problems. 

Selection  of  features  and  concepts  Is  relatively  subjective.  No  claim  Is  made  that 
those  chosen  for  investigation  are  exhaustive.  In  the  Interest  of  economy,  certain 
Standard  JOVIAL  features  were  deliberately  left  out  of  the  list  because  it  was  felt 
that  little  utility  could  be  gained  from  their  study. 

The  features  and  concepts  have  been  organized  Into  "function  modules"  and  sub  modules 
in  order  to  clearly  point  up  functional  relationships  between  them.  This  organization 
serves  to  Impose  a  perspective  on  the  large  number  of  features  and  concepts  being 
evaluated. 

In  the  following  list  of  features  and  concepts  the  notation  "(Q)"  denotes  a  feature 
about  which  information  was  solicited  in  the  JAQ  and  "(I)"  denotes  a  feature  or 
concept  about  which  information  was  solicited  at  the  interviews. 

(1)  Function  Module:  Data 

a^  Item  Data  (NcTn-Structured  Data) 

•  Literal  Items 

Standardized  Expanded  Character  Set  (I) 

(Expanded  JOVIAL  sign  set) 
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Item  Type  Hollerith  (Q) 

Item  Type  Standard  Transmission  Code  (Q) 

Character  Data  Size  Attribute  (Q) 

User  Definable 

Character  Set/Encoding  Scheme  (I) 

•  Status  Items  (Q) 

•  Status  Formulas  (Q) 

•  Explicit  Status  Size  Attribute  (Q) 

•  Item  Type  Bit  String  (I) 

b)  Data  Structures  (Aggregates  of  Items) 

•  Structure  Array  (Q) 

•  Structure  Table  (Q) 

Table  Variability  Attribute  -  Rigid  (Q) 

Table  Variability  Attribute  -  Variable  (Q) 

NENT  (Q) 

NWDSEN  (Q) 

Structure  String 
0  Structure  GROUP  (I) 

•  Structure  SET  (I) 

c)  Dynamic  Allocation  of  Data  (I) 

(2)  Function  Module:  Referencing  Data 

i  BIT  (Q) 

•  BYTE  (Q) 

•  CHAR/MANT  (Q) 

•  Subscripting 

Subscripting  Expressed  as  Complex  Numeric  Formula  (Q) 
Nested  Subscripting  (Q) 

•  Table  Entry  Referencing  (ENTRY/ENT)  (Q) 

•  Table  Entry  Referencing  Notation  -  ENT  (Q) 

(3)  Function  Module:  Representing  Data  in  the  Standard  JOVIAL  J3  Memory 

•  Computer  Representation  of  Data  (Q) 

•  Importance  of  Storage  Allocation  Facilities  (I) 

•  Importance  of  Machine  Independence  (I) 

•  Memory  “Model"  (Q) 

•  Signed  Magnitude  Representation  of  Numbers  (I) 

•  Octal  Constant  (Q) 

•  Hexadecimal  Constants  (I) 

•  Basic  Table  Structure  Attribute  -  Parallel  (Q) 

•  Basic  Table  Structure  Attribute  -  Serial  (Q) 

•  Generalized  Packing  (I) 

•  Ordinary  (Table)  Packing  -  Medium  and/or  Dense  (Q) 

Ordinary  Packing  -  Medium  (Q) 

Ordinary  Packing  -  Dense  (Q) 

"No  Packing"  Notation  -  "N"  (Q) 
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•  Defined  (Table)  Packing  (Q) 

•  Independent  Overlay  Declaration  (Q) 

•  Subordinate  Overlay  Declaration  (Q) 

• *  *LOC  (Q,  I) 

•  Absolute  addresses  (OVERLAY,  PROGRAM)  (I) 

(4)  Function  Module;  Numeric  Items  and  Arithmetic  Operations 

•  Item  Type  Integer  (Q) 

•  Item  Type  Fixed  Point  (Q) 

•  Item  Type  Fixed  Point 

Scale  in  Declaration  Blank  or  Zero  (Q) 

•  Range  Attribute  (Q) 

•  Item  Type  Floating  Point  (Q) 

•  Sign  Attribute  (Signed  and  Unsigned)  (Q) 

•  Double  Precision 

(also  called  Extended  Precision)  (I) 

•  Parenthesized  Numeric  Formulas  (Q) 

•  Mixed  Item  Types  In  Numeric  Formulas  (Q) 

•  Prefix  +  and  -  (Q) 

•  Precedence  of  Prefix  +  and  -  (I) 

•  Exponentiation  Operator  (Q) 

•  Exponentiation  Notation  -  (  *  *  )  (Q) 

•  Absolute  Value  Operator  (Q) 

•  Absolute  Value  Notation  -  (/ /)  (Q) 

•  REM  (Q) 

•  REMQUO  (Q) 

(5)  Function  Module;  Dual  Items  and  Dual  Arithmetic  Operations 

•  Item  Type  Dual  (Q) 

•  Dual  Arithmetic  Operations  (Q) 

•  Structure  Operators  -  Arrays,  Tables  (I) 

•  Structure  Operator  -  Matrix  (I) 

•  Structure  Operator  -  Complex  (I) 

(6)  Function  Module:  Testing  Operations 

•  Hollerith  Comparisons  O) 

•  Relational  Formulas  (excluding  chained)  (Q) 

•  "Chained"  Relational  Formulas  (Q) 

•  ODD  (I) 

(7)  Function  Module:  Boolean  Items  and  Logical  Operators  AND,  OR,  and 

not 

•  Boolean  Formulas-with  AND,  OR,  NOT  (Q) 

•  Boolean  Items  (Q) 

(8)  Function  Module:  Assignment 

•  Numeric  Item  Type  Conversion  In  Assignment  Statements  (Q) 

•  Rounded  Numeric  Assignment  (I) 
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•  Round  Attribute  (Q) 

•  Boolean  Assignment  Statement  (Q) 

•  Item  Preset  (Q) 

•  Array  Preset  (Q) 

•  String  Preset  (Q) 

•  Exchange  Statement  (Q) 

(9)  Function  Module:  Program  Structure  and  Execution  of  Program  Structure 
0^5  Parallel  Processing  (I) 

b)  Compound  Statement  (Q) 

c)  GOTO  Statement  (Q) 

d)  Stopping  and  Pausing 

•  STOP  (Q) 

•  STOP  (Modification)  (I) 

•  STOP  StatementMabel  (Pausing)  (Q) 

•  Pausing  (I) 

e)  Conditional  Tronsfer  of  Control 

•  IF  Statement  (Q) 

•  IFEITH/ORIF  (Q) 

•  Index  Switch  (Q) 

•  Item  Switch  (Q) 

•  Label  Items  (I) 

•  Switch  Names  within  Switch  Declarations  (Q) 

•  Close  Names  within  Switch  Declarations  (Q) 

•  Parallel  "Monitoring"  (I) 

f)  FOR  Statements  (Iteration) 

•  FOR  Loop  -  One  Factor  (Q) 

•  FOR  Loop  -  Two  Factor  (Q) 

•  FOR  Loop  -  Three  Factor  (Q) 

•  FOR  Loop  -  Decrementing  (Q) 

•  Test  Statement  (Q) 

g)  Closed  Subprograms  and  their  Execution 

•  Program  (Q) 

•  Procedure  (Excluding  Function)  (Q) 

•  Alternate  Procedure  Entrances  (Q) 

•  Close  in  Parameter  List  (Q) 

•  Statement  Label  in  Parameter  List  (Q) 

•  Function  (Q) 

•  Close  (Q) 

•  Closed  Subprogram  (Delete  Close  in  Favor  of  Proc?)  (1) 

•  Return  Statement  (Q) 

•  ’PROGRAM  Declaration  (Q) 

•  Recursive  Subprograms  (I) 

h)  Direct  Code  (Q) 
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(1 0)  Function  Module;  Input/Output 

•  Structure  File 

•  Structure  File  —  Hollerith  or  Binary  (Q) 

•  Structure  File  —  Record  Length  Variability  (Q) 

•  Input/Output  -  POS  (Q) 

•  Input/Output  -  OPEN  Statement  with  Operand  (Q) 

•  Input/Output  -  OPEN  Statement  without  Operand  (Q) 

•  Input/Output  -  SHUT  Statement  with  Operand  (Q) 

•  Input/Output  -  SHUT  Statement  without  Operand  (Q) 

•  Input/Output  -  Input  Statement  (Q) 

•  Input/Output  -  Output  Statement  (Q) 

•  Stream  Oriented  I/O  (I) 

•  Functional  Files  (I) 

•  Device  Oriented  I/O  (I) 

(1 1 )  Function  Module:  Naming  Data  and  Program  Structures 

•  Proc-like  Name  Scopes  (l) 

•  Multiple  Statement  Labels  (Q) 

(1  2)  Definition  Facilities 

•  Define  Directive  (Q) 

•  Extended  Define  Directive  (I) 

•  Mode  Directive  (Q) 

•  Extended  Mode  Directive  (I) 

•  Like  Table  Declaration  (Q) 

•  Macro  Facilities  (I) 

1  .3  Method  of  Analysis 

This  subsection  describes  the  philosophy  of  language  and  language  standardization 
which  is  central  to  the  methods  of  this  analysis.  In  addition,  the  method  of  analysis 
of  the  JOVIAL  Application  Questionnaire  and  Interview  Responses  is  described. 

1.3.1  Philosophy  of  Languages  and  Language  Standardization 

Very  briefly,  a  language  is  a  notational  system  with  a  community  of  users.  The 
structure  of  the  language  "sentences"  and  the  meanings  associated  with  them  reflect 
both 

•  a  set  of  problems  shared  by  members  of  the  community,  and 

•  a  set  of  tools  which  make  the  problems  tractable. 

To  standardize  a  language  means  to  determine  the  problems  faced  by  all,  or  a 
substantial  subset,  of  the  members  of  the  community  and  to  obtain  a  consensus  as  to 
the  tools  to  be  employed  in  solving  the  common  problems.  Clearly,  a  language 
standard  should  not  support  tools  designed  for  coping  with  problems  peculiar  to  a 
small  subcommunity  nor  should  the  standard  support  a  variety  of  different  sets  of 
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tools  designed  to  handle  the  same  set  of  common  problems.  The  importance  of 
standardizing  a  language  lies  in  the  fact  that  more  efficient  communication  of 
problems  and  problem  solution  will,  in  general,  ensue.  Standardization  creates  a 
common  frame  of  reference  for  the  members  of  the  community  of  users. 

The  language  which  is  the  object  of  this  study  is,  of  course,  the  JOVIAL  J3  dialect 
of  JOVIAL  specified  in  AFM  100-24.  The  community  of  users  consists  of  all  those 
applications  personnel  who  are  employing  JOVIAL  in  computerized  command  and 
control  systems.  The  problem  solving  tools  are  the  JOVIAL  language  features 
themselves  and,  equally  important,  sets  of  features  which  In  this  document  are  referred 
to  as  function  modules.  It  is  felt  that  evaluation  of  individual  features  In  an  isolated 
fashion  is  insufficient  because  many  related  features,  or  tools,  are  generally  brought 
to  bear  in  concert  to  solve  command  and  control  problems.  Thus,  the  significance  of 
fixed  point  items,  say,  can  be  meaningfully  understood  only  in  the  context  of  the  other 
numeric  items  (integer  and  floating  point),  since  the  numeric  items  are  functionally 
connected. 

Similarly,  the  significance  of  numeric  items  can  be  better  understood  when  examined 
in  the  context  of  arithmetic  operations.  "Numeric  Items  and  Arithmetic  Operations" 
constitute  a  subsystem  of  individual  JOVIAL  features  which  address  the  general  problem 
of  representing  numeric  entities  and  doing  arithmetic  with  them.  This  study  then  relies 
heavily  on  the  concept  of  problem  solving  subsystems,  or  function  modules,  to  clarify 
command  and  control  programming  processes  and  to  aid  in  the  evaluation  of  individual 
features. 

The  analysis  techniques  employed  in  the  evaluation  of  the  JOVIAL  language  resulted 
in  the  partitioning  of  the  JOVIAL  features  into  three  subsets: 

•  A  Nucleus  subset  which  includes  features  used  to  deal  with  the 
problems  faced  by  a  substantial  majority  of  the  members  of  the 
community, 

•  An  Optional  subset  which  includes  the  features  used  to  deal  with 

the  problems  faced  by  a  significant  number  of  members  of  the  community, 
and  a 

•  Deleted  subset  consisting  of  those  features  which  are  used  infrequently 
or  not  at  all  by  all  but  a  very  few  members  of  the  community. 

It  is  our  intention  that  all  implementations  of  Standard  JOVIAL  J3  contain  the 
features  of  the  Nucleus  subset;  that  implementors  select  all  or  none  of  the  features 
in  the  Optional  subset  —  depending  on  their  requirements;  that  no  implementation 
of  Standard  JOVIAL  J3  contain  any  of  the  Deleted  subset  features. 
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The  technique  used  to  determine  if  a  feature  is  to  be  in  the  Nucleus,  Optional,  or 
Deleted  subsets  is  called  the  "resolution".  Concepts  may  be  thought  of  as  placed  in 
Nucleus  or  Optional  concept  subsets.  Features  —  explicit  language  facilities  — 
are  then  placed  accordingly  in  the  Nucleus  or  Optional  feature  subset.  The  word 
"resolution"  will  be  used  to  describe  the  process  of  disposition  of  concepts  as  well 
as  features.  With  respect  to  both  JAQ  and  interview  response  analysis,  retention 
as  nucleus  will  be  recommended  if  two  thirds  or  more  of  the  (effective)  respondents 
show  a  high  degree  of  appreciation  for  the  feature/concept;  retention  as  optional  will 
be  recommended  if  fewer  than  two  thirds  but  not  fewer  than  one  third  show  a  high 
degree  of  appreciation.  "High  degree  of  appreciation"  is  defined  separately  for 
JAQ  and  Interview  Analysis. 

1.3.2  Method  of  Analysis  of  JAQ  Responses 

The  Standard  JOVIAL  J3  features  about  which  information  was  collected  in  the 
JAQ's  has  been  divided  into  two  classes: 

•  Class  1  the  features  in  this  class  have  been  "Accepted  as 

nucleus"  features  a  priori;  they  are  deemed  so 
important  that  retention  without  question  is  recommended 
and  they  are  automatically  placed  in  the  Nucleus  feature 
subset. 

•  Class  2  the  features  in  this  class  are  all  those  features  not 

in  Class  1  .  Their  placement  in  the  Nucleus,  Optional , 
or  Deleted  subsets  must  be  determined  on  the  basis  of 
the  JAQ  responses. 

In  almost  every  case,  the  function  performed  by  a  Class  2  feature  can  be  performed 
by  one  or  more  Class  1  features.  The  resolution  of  each  Class  2  feature  is  performed 
using  a  cost-effectiveness  technique  based  upon  a  "usage  rate",  or  resolution  equation, 
and  comparison  of  the  usage  rate  with  a  "usage  rate  threshold".  It  should  be  noted 
that  a  distinct  usage  rate  and  usage  rate  threshold  have  been  defined  for  all  of  the 
Class  2  features  considered  in  the  study.  The  usage  rate  is  either  the  number  of 
times  the  feature  was  reported  used  in  the  JAQ  or  it  is  a  function  of  this  number. 

In  most  cases  the  function  is  a  simple  ratio  with  the  number  of  uses  appearing  as  the 
numerator.  Ratios  of  this  kind  serve  to  measure  the  fraction  of  times  a  feature  was 
used,  where  it  could  have  been  used  to  satisfy  a  certain  oppUcation  requirement.  For 
example,  in  those  cases  where  some  "recurrent"  data  structure  is  required  to  fulfill 
an  application  requirement,  the  utility  of  using  tables,  given  that  both  tables  and  arrays 
will  satisfy  this  requirement,  may  be  measured  by  the  usage  rate. 


U  = 


N(TABLES) 

N(TABLES)  +  N(ARRAYS) 


Q78 


Q78  +  Q74 


8 


where 

N(TABLES)  represents  the  number  of  occurences  of  a  TABLE 

declaration  in  an  application  as  contained  In  JAQ  question  Q78,  and 

N(ARRAYS)  represents  the  number  of  occurences  of  an  ARRAY 

declaration  in  an  application  as  contained  In  JAQ  question  Q74. 

If  the  usage  rate  for  tables,  when  evaluated  with  JAQ  response  data  for  a  specific 
application,  is  greater  than  one  half,  say,  we  infer  that  the  application  programmers 
find  their  “recurrent”  data  structure  problems  more  readily  tractable  in  terms  of  tables 
than  arrays  in  more  than  one  half  of  the  instances  in  which  a  recurrent  data  structure 
Is  required.  Two  facts  regarding  usage  rate  evaluation  must  be  noted. 

(1)  In  cases  where  both  the  numerator  and  denominator  are  0, 
the  usage  is  taken  as  0  by  convention 

(2)  Because  the  JAQ  permits  usage  responses  which  are  estimates 
rather  than  exact  counts,  such  ratios  as  the  one  in  the  example 
above  may  yield  values  greater  than  one  on  evaluation.  In  such 
cases  the  evaluated  usage  rate  may  be  thought  of  as  a  "preference 
indicator" . 

The  usage  rate  threshold  is  a  number  against  which  usage  rates,  evaluated  for  a 
given  application,  are  compared.  With  respect  to  a  given  feature,  the  usage 
rate  threshold  Is  constant  for  each  application.  If  the  usage  rate  for  a  given 
application  is  greater  than  or  equal  to  the  threshold  specified  for  the  feature, 
we  infer  that  the  application  programmers  obtain  a  reasonable  degree  of  utility 
(i.e.,  a  high  degree  of  appreciation)  from  the  feature;  otherwise,  we  infer  that  the 
utility  gained  does  not  offset  the  "cost"  of  the  feature.  It  must  be  noted  that  it  Is 
impossible  to  arrive  at  precisely  accurate  thresholds  since  no  accurate  means  exist 
to  measure  costs  and  utilities.  Indeed,  DDI  has  specified  thresholds  subjectively,  based 
upon  our  own  experience  with  command  and  control  applications  and  knowledge  of  the 
compilation  process.  Where  we  have  specified  a  high  threshold,  we  feel  that  the  cost 
outweighs  the  utility;  a  low  threshold  indicates  that  the  utility  is  worth  the  cost.  Usage 
rate  thresholds,  then,  have  been  arrived  at  subjectively  by  weighing  the  cost  of  each 
Class  2  feature  against  its  effectiveness  or  utility.  Examples  of  characteristics  which 
drive  up  the  cost  of  a  feature  are: 

(1)  The  feature  is  redundant  —  its  function  can  be  performed  by  other 
(Class  1)  features.  The  redundancy  requires  a  more  complex  compiler 
and  more  learning  (with  possibly  more  errors  made)  by  the  programmer. 

(2)  The  feature  is  context  sensitive,  introducing  certain  levels  of  complexity 
Into  the  compilation  process  (e.g.,  status  constant). 
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A  Class  2  feature  is,  In  general,  effective  In  that  It  provides  a  programmer  convenience. 
Thus  the  exchange  statement 


AA  =  =  BB  $ 


is  more  convenient  to  the  programmer  than 

TEMP=BB  $ 

BB  =  AA  $ 

AA  =  TEMP  $ 

though  an  expense  is  Incurred  in  the  implementation  of  the  exchange  feature. 

Because  of  the  subjectivity  involved  In  specifying  thresholds,  we  have  deliberately 
leaned  toward  low  values  for  thresholds.  The  low  values  of  thresholds  reflects 
an  underlying  philosophy  maintained  throughout  this  study,  namely  that  the  error  Incurred 
by  accidently  deleting  or  making  optional  a  useful  feature  was  far  more  serious  than  the 
error  of  retaining  a  non-useful  features. 

The  usage  rates  and  thresholds  for  each  feature  are  given  with  the  response  summaries 
for  the  feature  in  Appendix  2.  There,  usage  rate  threshold  Is  denoted  by  T1  . 

1  .3.3  Method  of  Analysis  for  Interview  Responses 

A  concept  or  proposed  new  feature  was  retained  as  nucleus  If  more  than  two  thirds  of  the 
members  of  the  community  responding  responded  positively.  The  concept  or  proposed 
new  feature  was  retained  as  optional  if  there  were  from  one  third  to  two  thirds  positive 
responses  and  it  was  deleted  if  less  than  one  third  responded  positively.  The  Interview 
Response  Analysis  may  be  found  In  Appendix  4. 
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SECTION  II 


CONCLUSION 


This  section  contains  recommendations,  based  on  both  the  JAQ  and  Interview 
Response  Analysis,  for  alteration  of  the  Standard  JOVIAL  (J3)  language  dialect. 

The  recommendations  include  a  list  of  JOVIAL  language  extensions  along  with 
a  list  of  deletions  of  features  currently  specified  in  AFM  100-24.  Additionally, 
all  current  and  extended  features  are  classified  as  either  Nucleus  or  Optional .  Finally, 
this  section  contains  a  discussion,  in  general  terms,  of  our  observations  on  command  and 
control  programming  language  requirements. 

2.1  JOVIAL  Language  Extensions 

2.1  .1  List  of  Extensions 

DDI  recommends  that  the  following  extensions,  described  fully  in  the  indicated 
subsections  of  Section  3,  be  incorporated  into  the  Standard  JOVIAL  J3  language 
as  Nucleus  or  Optional  features: 

(1)  Hexadecimal  Constants  (3. 2. 2,1) 

(Optional  —  User  may  implement  hexadecimal,  or  octal,  or 
both,  but  either  hexadecimal  or  octal  must  be  implemented.) 

(2)  Simplified  Hollerith  Constant  Form  (3.2.2. 2) 

(Optional  —  Removes  the  requirement  to  count  the  number  of 
hollerith  characters.) 

(3)  User  Definable  Character  Encoding  (3. 2. 2. 3) 

('CHARCODE  Directive) 

(Optional  —  Provides  facility  for  defining  a  character  set  and 
encoding  scheme  for  each  character  In  It.) 

(4)  Operations  on  Literal  Data  (3. 2. 2.4) 

(Nucleus  —  Establishes  facility  for  Hollerith  and  other  Literal 
Comparisons  as  well  as  conversion  between  Literal  item  types  on 
assignment. ) 

(5)  Computer  Representation  of  Numeric  Constants  and  Variables  (3. 2. 2.5) 
(Nucleus  —  loosens  the  machine  dependent  restrictions  on  representation 
of  numeric  data . ) 

(6)  Precedence  of  Unary  Operators  (3. 2. 2. 6) 

(Nucleus  —  Changes  the  precedence  of  prefix  +  and  -  to  next 
highest  after  exponentiation.) 
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(7)  Extended  Define  Directive  (3. 2.2.7) 

(Optional  —  Allows  "arguments"  to  be  included  with  a  DEFINE 
identifier.) 

(8)  Extended  Mode  Directive  (3. 2.2.8) 

(Optional  —  Allows  mode  directive  to  select  Item  description  on  basis 
of  first  letter  of  name.) 

(9)  Alternate  Entrances  to  Procedures  and  Functions  (3. 2.2.9) 

(Nucleus) 

(10)  Extended  Precision  Numeric  Items  and  Constants  (3.2.2.10) 

(Optional^  with  hardware  —  Permits  declaration  of  double  precision 
floating  point  numbers.) 

(1 1 )  Device  Oriented  Input/Output  Module  (3.2.2.11  . 1 ) 

(Optional  —  Provides  framework  for  commanding  and  responding 
to  I/O  devices.) 

(12)  Functional  File  Input/Output  Module  (3.2.2.11.2) 

(Optional  —  Provides  framework  for  functional  (("logical"))  file 
processing.) 

(13)  Data  Editing  and  Conversion  (Formatting)  (3.2.2.11.3) 

(Nucleus  —  provides  FORTRAN-Ilke  formatting  capability.) 

(14)  Stop  Statement  (3.2.2.12) 

(Nucleus  —  Alters  the  meaning  of  STOP  to  suspend  processing 
wherever  executed . ) 

(15)  Pause  Statement  (3.2.2.13) 

(Optional  —  Provides  pausing  facility.) 

(16)  Rounded  Assignment  Statement  (3.2.2.14) 

(Optional  —  Provides  the  facility  for  declaring  rounding  in  an 
assignment  statement,  not  In  the  item  declaration.) 

(17)  Extension  to  Program  (3.2.2.15) 

(Optional  —  Allows  the  ability  to  declare  a  procedure  as  a  "stand- 
alone"  subrouti  ne . ) 

2.1.2  Remarks  on  Extensions 

2. 1.2.1  Input/Output 

The  proposed  (optional)  Device  Oriented  I/O  module  and  Functional  File  module 
are  intended  to  supercede  the  File  Structure  and  Operators  currently  specified  in 
AFM  100-24.  The  two  modules  proposed,  force  a  separation  of  hardware  considerations 
from  function  or  logical  file  elements  with  the  intent  of  providing  much  greater 
flexibility  and  power  than  that  offered  by  the  current  file  system  of  the  standard.  It 
must  be  pointed  out,  however,  that  the  Functional  File  Module  is  very  loose  and 
therefore  highly  "participational"  In  nature.  The  applications  programmer  must  write 
his  own  set  of  support  programs  to  do  all  the  real  file  manipulation  work;  however. 
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it  is  anticioated  that  user  installations  fix  on  a  standard  set  of  suoport  orograms  which 
would  be  used  by  all  aoplications  programmers.  The  Functional  File  Module  is  loose 
for  the  reason  that  we  are  unable  at  this  time  to  fully  identify  functional  file  oropertles. 
This  was  due  to  the  fact  that  the  Inout/Outout  information  obtained  In  the  study  was 
soarse ,  and  the  latter  fact  may  be  true  because  I/O  at  this  level  tends  to  be  comolex. 
We  recommend  that  this  area  be  studied  further^  In  the  light  of  command  and  control 
aopi icatl ons . 

The  formatting  module  has  been  made  Independent  of  the  other  I/O  modules,  since  it 
is  nucleus,  while  the  others  are  optional. 

2. 1 .2.2  Overriden  Extensions 

Certain  features  and  conceots  were  well  received  at  Interview  and  should,  by  all 
rights  be  oroDosed  as  either  nucleus  or  optional  extensions  now.  These  features  and 
conceots  are: 

®  Item  Type  Bit  String 

•  (Data)  Structure  GROUP 

•  Structure  SET 

•  Dynamic  Storage  Allocation  Facilities 

•  Generalized  Packing 

•  Label  Item 

•  Recursive  Suborograms 

Our  action  —  to  make  no  recommendation  at  this  time  —  is  based  on  arguments 
discussed  under  observations  (sub-section  2.5,  below)  and  also  on  the  fact  that  the 
addition  of  these  new  structures  would  result  in  some  complex  ramifications  which 
are  unresolved  at  this  time  involving  currently  available  structures. 

2.2  Deletions 

The  criteria  utilized  to  determine  which  JOVIAL  features  should  be  deleted  Is  given 
in  Section  1  (1  .3).  Based  on  these  criteria  and  the  data  summarized  In  the  JOVIAL 
Feature  Resolution  Analysis  contained  In  Appendix  2  as  qualified  by  the  Interview 
Resoonse  Analysis  contained  in  Appendix  4,  Data  Dynamics  recommends  that  the 
following  features  be  deleted  from  the  JOVIAL  Soecifications  AFM  100-24. 

The  number  in  oarenthesis  in  the  list  below  is  the  Approach  for  Change  (AFC)  reference 
number  which  references  the  Resolution  Analysis  of  each  soecific  feature. 


1)  Item  Type  Standard  Transmission  Code 

2)  Standard  Transmission  Code  Formulas 

3)  Structure  String 

4)  CHAR/MANT 

5)  Table  Entry  Referencing  Notation  -  ENT 
(ENTRY  only  may  be  used) 


AFC^ 

(A  1  . 1  . 1  . 2) 
(A1  .1  .1  .2) 
(A1  .2.5) 
(A2.3) 
(A2.6) 
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6) 

Ordinary  Packing  -  Medium 

AFC*** 

7) 

(Only  Dense  Packing  is  allowed) 

Ordinary  Packing  -  No  packing  specified 

(A3. 4) 

8) 

Subordinate  OVERLAY  Declaration 

(A3. 6) 

9) 

Round  Numeric  Assignment  Range  Attribute 

(A4.3) 

10) 

Exponentiation  Notation  -  (*  *) 

(A4.6) 

11) 

(Only  **  may  be  used) 

Absolute  Value  Notation  (/ /) 

(A4.8) 

12) 

(Only  ABS  may  be  used) 

REM 

(A4.9) 

13) 

REMQUO 

(A4.9) 

14) 

Item  Type  Dual 

(A5) 

15) 

Dual  Formulas 

(A5) 

16) 

String  Preset 

(A8.1) 

17) 

Round  Attribute 

(A8.2) 

18) 

Stop  Statement  Label 

(A9.3) 

19) 

Switch  Names  within  Switch  Declarations 

(A9.4.3) 

20) 

Close  Names  within  Switch  declarations 

(A9.4.3) 

21) 

Structure  File 

(A  10) 

22) 

Structure  File  -  Hollerith  or  Binary 

(AlO) 

23) 

Structure  File  -  Record  Length  Variability 

(AlO) 

24) 

Open  Statement  with  Operand 

(AlO) 

25) 

Open  Statement  without  Operand 

(AlO) 

26) 

Shut  Statement  without  Operand 

(AlO) 

27) 

Shut  Statement  with  Operand 

(AlO) 

28) 

Input  Statement 

(AlO) 

29) 

Output  Statement 

(AlO) 

2.3  List  of  Nucleus  Features 

Based  on  the  criteria  and  data  as  indicated  in  sub-Section  2.2,  the  features  listed 
below  are  recommended  for  inclusion  in  the  Nucleus.  The  numbers  in  parenthesis 
reference  the  AFC  number  in  the  JOVIAL  feature  resolution  analysis  in  Appendix  2 
and  references  to  sub-Sections  of  Section  3. 

1)  Item  Type  Hollerith  (A1  .1  .1  .1) 

2)  Hollerith  Formula  (Al.  1.1.1) 

3)  Character  Data  Size  Attribute  (Al  .1  .1  .3) 

4)  Operations  on  Literal  Data  (3. 2. 2.4) 

5)  Explicit  Size  Attribute  (Al  .1  .3) 

6)  Structure  Table  (Al  .2.2) 

7)  Table  Variability  Attribute  -  Rigid  (Al  .2.3) 

8)  Table  Variability  Attribute  -  Variable  (Al  .2.3) 
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9)  NENT  (Al.2.3) 

10)  BYTE  (A 2. 2) 

11)  Subscripting  -  Expressed  as  Complex  Numeric  Formula  (A2.4) 

12)  Subscripting  -  Nested  (A2.4) 

13)  Table  Entry  Referencing  (A2.5) 

(ENTRY  only  may  be  used) 

14)  Computer  Representation  of  Data  (A3) 

15)  Computer  Representation  of  Numeric  Items  and  Constants  (3. 2.2.5) 

16)  Octal  Constants  (A3. 1 ,  3. 2. 2.1) 

Hexadecimal  Constant  (Must  Implement  one  or  the  other, 
may  implement  both) 

17)  Basic  Table  Structure  Attribute  -  Parallel  (A3. 3) 

18)  Basic  Table  Structure  Attribute  -  Serial  (A3. 3) 

19)  Defined  (Table)  Packing  (A3. 5) 

20)  Independent  Overlay  Declaration  (A3. 6) 

21)  'LOC  (A3.8) 

22)  Parenthesized  Numeric  Formulas  (A4) 

23)  Mixed  Item  Types  in  Numeric  Formulas  (A4) 

24)  Item  Type  Integer  (A4) 

25)  Item  Type  Fixed  Point  (A4) 

26)  Item  Type  Fixed  Point  -  Scale  in  Declaration  Blank  or  Zero  (A4) 

27)  Item  Type  Floating  Point  (A4) 

28)  Sign  Attribute  (A4.4) 

29)  Prefix  +  and  -  (A4.5) 

30)  Precedence  of  Unary  Operators  (3. 2. 2. 6) 

(Alteration  of  precedence  of  +,  -) 

31)  Exponentiation  Operator  (A4. 5) 

(Notation  **  only) 

32)  Relational  Formulas  (excluding  chained)  (A6.1) 

33)  Boolean  Formulas  -  with  AND,  OR,  NOT  (A7.1) 

34)  Item  Type  Boolean  (A7.2) 

35)  Numeric  Item  Type  Conversion  in  the  Assignment  Statement  (A8) 

36)  Boolean  Assignment  Statement  (A8) 

37)  Item  Preset  (A8.1) 

38)  Table  Preset  (A8.1) 

39)  Compc  jnd  Statement 

40)  GOTO  Statement  (A9.2) 

41)  STOP  Statement  (A9. 3,  3.2.2.12) 

42)  IF  Statement  (A9.4.1) 

43)  FOR-loop-One  Factor  (A9.5) 

44)  FOR-loop-Two  Factor  (A9.5) 

45)  FOR-loop-Three  Factor  (A9.5) 

46)  FOR-loop-Decrementing  (A9.5) 

47)  Test  Statement  (A9.5.4) 
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48)  Program  (A9.6,  A9.7) 

49)  Procedure  (Excluding  Function)  (A9.6.1) 

50)  Function  (A9. 6.1 ) 

51)  Alternate  Entrances  to  Procedures  and  Functions  (3. 2. 2.9) 

52)  CLOSE  (A9.6.2) 

53)  Return  Statement  (A9.6.3) 

54)  Direct  Code  (A9.8) 

55)  Data  Editing  and  Conversion  (3.2.2.11  .3) 

56)  Multiple  Statement  Labels  (All  .2) 

57)  ALL  (A  12. 5) 

58)  COMPOOL  (A12.6) 

2.4  List  of  Optional  Features 

Based  on  the  criteria  and  data  as  indicated  in  sub-section  2.2,  the  following  features 
are  recommended  to  be  included  as  optional  features: 

1)  Hexidecimal  Constants  (3. 2. 2.1) 

2)  Simplified  Hollerith  Constant  Form  (3. 2. 2. 2) 

3)  User  Definable  Character  Encoding  Scheme  ('CHARCODE)  (3.2. 2.3) 

4)  Item  Type  Status  (A1  .1.2)  \ 

5)  Status  Formulas  (A1  .1.2)  >  (Must  be  implemented  together) 

6)  Explicit  Status  Size  Attribute  (A1  .1  .3)  ) 

7)  Structure  Array  (A1.2.}) 

8)  NWDSEN  (A1  .2.4) 

9)  BIT(A2.1) 

10)  Ordinary  Packing  (Dense  only  is  allowed)  (A3. 4) 

1 1)  Absolute  Value  Operator  (ABS  only  is  allowed)  (A4.7) 

12)  Extended  Precision  Numeric  Items  and  Constants  (3.2.2.10) 

13)  Chained  Relational  Formulas  (A6.2) 

14)  Array  Preset  (A8.1) 

15)  Exchange  Statement  (A8.3) 

16)  IFEITH/ORIF  Statements  (A9. 4. 2) 

17)  Index  Switch  (A9. 4. 3) 

18)  Item  Switch  (A9.4.4) 

19)  CLOSE  in  Parameter  List  (of  Procedure)  (A9.6.1) 

20)  Statement  Label  in  Parameter  List  (of  Procedure)  (A9.6.1) 

21)  ' PROGRAM  Declaration  (A9. 7) 

22)  Item  Declaration  (A1  1  . 1 ) 

23)  Define  Directive  (A12.1) 

24)  Extended  Define  Directive  (3. 2. 2.7) 

25)  MODE  Directive  (A1  2.2) 

26)  Extended  MODE  Directive  (A12.2,  3. 2. 2. 8) 

27)  Like  Table  Declaration  (A12.4) 
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28)  Device  oriented  I  nput/ Output  Module  (3.2.2.11  . 1 ) 

29)  Functional  File  Input/Output  Module  (3.2.2.11.2) 

30)  Pause  Statement  (3.2.2.13) 

31)  Extension  to  Program  (“Stand-alone"  procedure)  (3.2.2.15) 
2.5  Observations 


2.5.1  Array 

The  only  feature  accepted  as  nucleus  originally  in  the  Approach  for  Change  which  did  not 
find  reasonable  user  support  was  the  Array.  We  have  therefore  made  Array  an  optional 
feature.  Users  found  Table  far  more  useful . 

2.5.2  Data  Structures 

Interview  responses  regarding  proposed  new  data  structures  (GROUP,  SET,  etc.)  together 
with  the  heavy  use  of  Tables  inclined  us  toward  the  belief  that  command  and  control 
programmers  require  the  ability  to  manipulate  highly  complex  data  structures.  We  feel 
that  it  is  unwise  to  simply  pile  on  new  structures  at  this  point.  Rather,  we  believe,  the 
command  and  control  language  should  contain  structure  building  primitive  operators 
which  would  allow  for  the  definition  and  creation,  either  at  compile  time  or  execution 
time,  of  a  wide  variety  of  complex  structures,  these  structures  taking  a  form  specified 
by  the  applications  programmer.  We  are  not  currently  able  to  identify  these  primitives 
but  feel  that  the  task  of  such  identification  should  be  pursued. 

2.5.3  Resource  Allocation 

Because  of  the  enthusiasm  of  interviewees  for  packing  capabilities,  and  the  proposed 
generalized  packing,  it  has  become  clear  that  the  command  and  control  programmer 
requires  the  ability  to  manage  the  memory  space  resouces  available  to  him.  We  note 
the  remark  of  ADPAC,  requesting  a  special  “fast-executing"  subset  of  JOVIAL  for 
real  time  application,  and  conclude  that  management  of  execution  time  resources  is 
probably  important  as  well.  We  feel  that  a  command  and  control  language  should 
probably  have  even  more  resource  management  facilities  than  JOVIAL  and  that  these 
should  be  connected  with  ease  to  the  data  structure  building  primitives  described 
in  sub-section  2.5.2. 
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SECTION  III 


EXTENSION  SPECIFICATIONS 


3.1  General 


This  section  contains  a  complete  description  of  the  deletions,  modifications,  and 
additions  to  the  JOVIAL  J3  language  as  specified  in  AFM  100-24  resulting  from  the 
analysis  phase  of  this  project.  In  addition,  the  section  contains  a  complete  list  of 
all  recommended  nucleus  and  optional  features  along  with  a  cross  reference  of  each 
feature  to  the  appropriate  section  in  the  "JOVIAL  Application  Questionnaire"  and 
the  "Approach  For  Change"  documents. 

During  this  project  many  JOVIAL  language  requirements  evolved  which  DDI  was 
unable  within  the  scope  of  the  project  to  investigate  in  detail.  An  example  of 
such  a  requirement  includes  language  features  which  would  allow  constructing  new 
types  of  data  structures  and  allocating  these  structures  and  computer  programs  in 
terms  of  a  specified  optimizalion  of  time  and  space.  Other  examples  as  Included 
in  Section  4  below,  such  as  including  real  time  concepts  and  list  processing 
capabilities,  were  also  not  within  the  scope  of  the  project.  However,  considering 
these  limitations,  DDI  is  confident  that  JOVIAL  Extentlon  Specifications,  described 
in  this  section,  is  a  significant  improvement  over  the  current  JOVIAL  J3  (AFM  100-24) 
Specifications. 

3.2  Recommendations 

The  following  are  DDI*s  recommendations  for  modifications  to  JOVIAL  Specifications 
as  contained  in  AFM  100-24. 

3.2.1  Deletions 

The  following  features  are  recommended  for  deletion  from  the  JOVIAL  Language.  The 
criteria  used  for  deletion  of  these  features  is  described  in  Section  1  and  the  specific 
resolution  analysis  of  each  feature  is  contained  in  Appendix  2.  The  references  for  each 
feature  Is  to  the  sub-section  relating  to  the  feature  in  the  JOVIAL  Application  Questionnaire 
(JAQ)  and  to  the  Approach  For  Change  (AFC)  documents.  As  the  JOVIAL  Feature  Resolution 
Analysis  in  Appendix  2  is  organized  by  AFC  numbers,  the  referenced  AFC  can  be  utilized 
to  find  the  specific  resolution  or  justification  for  deletion  of  each  of  the  following  features: 

Features  JAQ  AFC 

1)  Item  Type  Standard  Transmission  Code  J3. 5. 1.11. 2  Al.1.1.2 

2)  Standard  Transmission  Code  Formulas  J3.5.2.5  A1  .1  .1  .2 
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Features 


JAC^  AFC# 


3) 

Structure  String 

J3.5.1 .4 

A1 .2.5 

4) 

CHAR/MANT 

J3.5.2.2.2.3- 

-4  A2.3 

5) 

Table  Entry  Referencing  Notation-ENT 
(ENTRY  only  may  be  used) 

J3.5.2.2.1 

A2.6 

6) 

Ordinary  Packing  -  Medium 
(Only  Dense  Packing  is  allowed) 

J3.5.1  .3.6.1 

A3. 4 

7) 

Ordinary  Packing  -  No  packing  specified 

J3.5.1 .3.6.1 

A3. 4 

8) 

Subordinate  OVERLAY  Declaration 

J3.5.1 .7.2 

A3. 6 

9) 

Range  Attribute 

J3.5.1 .1 .8 

A4.3 

10) 

Exponentiation  Notation  -  (*  *) 

(Only  *  *  may  be  used) 

J3.5.2.3.3 

A4.6 

11) 

Absolute  Value  Notation  (/ /) 

(Only  ABS  may  be  used) 

J3.5.2.3.4 

A4.8 

12) 

REM 

J3.5.4.9 

A4.9 

13) 

REMQUO 

J3. 5.4.7 

A4.9 

14) 

Item  Type  Dual 

J3.5.1  .1 .7 

A5 

15) 

Dual  Formulas 

J3.5.2.4 

A5 

16) 

String  Preset 

J3.5.1 .6.4 

A8.1 

17) 

Round  Numeric  Assignment-Round  Attribute 

J3.5.1  .1  .10 

A8.2 

18) 

Stop  Statement  Label 

J3.5.5.7 

A9.3 

19) 

Switch  Names  within  Switch  Declarations 

J3.5.5.2 

A9.4.3 

20) 

Close  Names  within  Switch  Declarations 

J3.5.5.2 

A9.4.3 

21) 

Structure  File 

J3.5.1  .5 

AlO 

22) 

Structure  File  -  Hollerith  or  Binary 

J3.5.1  .5 

AlO 

23) 

Structure  File  -  Record  Length  Variability 

J3.5.1  .5 

AlO 

24) 

Open  Statement  with  Operand 

J3.5.3.3 

AlO 

25) 

Open  Statement  without  Operand 

J3.5.3.3 

AlO 

26) 

Shut  Statement  without  Operand 

J3.5.3.3 

AlO 

27) 

Shut  Statement  with  Operand 

J3.5.3.3. 

AlO 

28) 

Input  Statement 

J3.5.3.3 

AlO 

29) 

Output  Statement 

J3.5.3.3 

AlO 

3.2.2  Additions  and  Modifications 
3.2.2. 1  Hexadecimal  Constants 

For  some  computers,  the  specification  of  address  or  "bit  pattern"  information  is  more 
conveniently  expressed  by  use  of  the  hexadecimal  (base  16)  number  system  than  by  the 
octal  system.  Depending  on  their  needs,  implementors  may  incorporate  hexadecimal 
constants,  octal  constants,  or  both. 
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A  hexadecimal; constant  is  composed  of  hexadecimal ;numera Is.  A  hexadecimal ;numeral 
is  one  of  the  following  sixteen  JOVIAL  numerals  or  letters: 

0,  1,  2,  3,  4,  5,  6,  7,  8,  9,  A,  B,  C,  D,  E,  F 

The  correspondence  between  hexadecimal  numerals  and  bit  patterns  is: 

Hexadecimal  Numeral  Bit  Pattern 


0 

1 

2 

3 

4 

5 

6 

7 

8 
9 
A 
B 
C 
D 
E 
F 


0000 
0001 
0010 
0011 
0100 
0101 
01 10 
01 1 1 
1000 
1001 
1010 
1011 
1100 
1101 
1110 
nil 


A  hexadecimal -.constant  is  formed  by  the  letter  X,  followed  by  a  left  parentheses, 
followed  by  a  string  of  hexadecimal -.numerals,  followed  by  a  right  parentheses: 


X(string;of ;hexadecimal  :numerals) 


Examples  of  hexodeci mal ;constants  ore: 

X(777) 

X(F) 

X(01A9) 

X(FAD) 


A  hexadecimal :constant  is  represented  os  a  string  of  bits,  equal  in  length  to  four  times 
the  number  of  hexodecimahnumerols  making  up  the  string;of:hexadecimal-.numerals  in  the 
constant  form;  four  bit  groups  making  up  the  bit  string  correspond  to  and  hove  the  some 
ordering  os  the  hexadecimal :numerals  making  up  the  hexodecimahconstont  os  shown  in  the 
table  above . 
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Hexadecimal ;constants  may  be  used  in  the  same  places  as  octal iconstants  and  have 
corresponding  meanings.  More  specifically:  Hexadecimal :constants  nni^ be  used  in 
machine  address  specifications  (os  in  OVERLAY),  preset  specifications  in  numeric: 
or  literal :item,  array:,  or  table :item:declarations,  and  in  literal :assignment:statements. 

3. 2. 2. 2  Simplified:Hollerith:Constant  Form 

A  hoi lerith:constant  is  either  a  regular:hollerith:constant  or  a  simplified:hol lerith: 
constant.  A  regular:hollerith:constant  has  the  form  number  H(string:of:hol lerith: 
characters)  (see  CED  2418,  AFM  100-24  under  hoi  lerith  :constant) .  A  simplified: 
hollerithTconstant  has  the  form 

H (string:of: hoi  lerith  :characters) 

with  the  restrictions  on  the  string:of:hollerith:characters  that,  in  scanning  from  left  to 
right  through  string,  the  number  of  right:parentheses  encountered  at  any  given  position 
must  never  exceed  the  number  of  left:parentheses  encountered,  and  the  total  number  of 
left-parentheses  included  in  the  string  must  equal  the  total  number  of  right:parentheses. 

Examples  of  simplified:hollerith:constants  ore 

H(NO  MORE  COUNTING  WITH  MOST  HOLLERITH  CONSTANTS) 


and 


H(NO  MORE  COUNTING  WITH  (MOST)  HOLLERITH  CONSTANTS) 

3. 2. 2. 3  User  Definable  Character  Encoding  ('CHARCODE) 

This  facility  allows  the  programmer  to  define  a  variety  of  character  sets  and  encoding 
schemes,  and  is  a  compiler  directive  in  the  sense  of  the  JOVIAL  MODE  and  DEFINE 
features.  A  'CHARCODE  directive  shows  a  correspondence  between  each  member  of 
a  user  selected  set  of  characters  and  a  user  determined  "bit  pattern"  memory  representation 
for  that  character. 

The  set  of  all  characters  from  which  the  programmer  may  choose  in  building  a 
character  set/encoding  scheme  contains  at  least  the  JOVIAL  signs,  and  possibly 
some  implementation  dependent  characters  os  well;  additionally  this  "set  of  all 
characters"  has  on  implementation  dependent  "bit  pattern"  memory  representation  or 
encoding  scheme.  In  JOVIAL  terminology,  this  character  set/encoding  scheme  is 
referred  to  by  the  adjective  hoi  lerith. 
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It  is  anticipated  that  the  two  major  uses  for  *CHARCODE  will  be 

•  to  provide  a  means  for  Interfacing  with  many  kinds  of  I/O  devices 
(each  of  which  may  have  different  bit  pattern  representations  for  a 
character  set),  and 

•  to  permit  the  specification  of  user  defined  collating  sequences. 

A  charcode:dIrective  is: 


*CHARCODE  0*  charcoderletter  0  fll  I  rcharacter  6 
BEGIN  0  char:code;correspondence:list  0  END  0  $ 

Charcodeiletter  means  any  of  the  letters  excluding  I,  A,  F,  H,  B,  S,  O,  X,  or  V; 
char:code:^orresponde nee: list  means  either:  Charicodercorrespondence  or  charicode: 
c orre s p on de n ce : 1 1 s t  0;  charreode  rcorresponde nee  means: 

Hol lerithreharacter  0  =  0  hex:or:octal:constant 

hexrorrocta I iconstant  means  an  octal rconstant,  if  the  Implementation  supports  octal: 
constants,  hexadecimal :constant  If  the  implementation  supports  hexa:decImal:constants, 
or  either  if  the  implementation  supports  both  octal  and  hexadecimal .  Fllhcharacter 
and  hollerIth:character  are  single  hollerlth  characters  expressed  as  hol lerithreonstants  one 
character  in  length.  The  meaning  of  fill :character  will  be  explained  in  connection  with 
literal :QssIgnment:statements  and  literal  comparisons  in  sub-section  3. 2. 2. 4.  It  is 
required  that  fill :character  appear  In  the  char:code:correspondence:l  1st. 

The  charcode:dIrectIve  serves  to  define  a  new  Item  type  with  a  name  "abbreviation" 
specified  by  charcode:letter,  in  the  same  sense  that  "H"  Is  the  (built-in)  literal :Item 
type  holleritir!  The  adjective  literal  will  henceforth  be  applied  to  Items,  constants, 
arrays,  etc.,  for  which  either  the  adjective  hollerith  applies,  or  where  the  data  involved 
are  defined  with  respect  to  a  charcoderdirective . 

While  a  charcode :dl recti ve  Is  active.  It  is  possible  both  to  declare  items  and  to  express 
constants  for  the  literal:item  type  defined  by  that  charcode:directive .  ltem:declaratIons 
and  constants  for  llteTanitem  types  defined  by  charcode:dIrectives  are  formed  precisely 
as  hoirerith:item:declarations  and  constants,  except  that  "H"  in  such  declarations  and 
constants  is  replaced  by  charcoderletter;  also  the  string  of  characters  appearing  in  such 
constants  must  be  made  up  only  of  those  characters  which  appear  in  the  directive . 


*0  means  that  a  space  Is  required  or  permitted. 
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Regarding  the  computer  memory  representation  of  chorcode  defined  character  sets, 
these  character  set  are  represented  in  byte  strings  in  the  same  manner  as  Hollerith 
characters,  each  byte  being  co  bits  in  length  (see  AFM  100-24,  Figure  24-1  and 
CED  2419.6).  Further,  the  encoding  of  characters  within  bytes  is,  of  course,  as 
specified  in  the  chorcode ;directive . 

Regarding  the  char:  code  •.correspondence;  list; 

•  A  given  hollerith  character  may  appear  once  and  only  once  in  any 
charcode;directive. 

•  A  given  hexadecimal  or  octal  encoding  may  appear  once  and  only 
once  in  any  charcode;directive. 

•  If  a  hex;or;octal:constant  has  a  size  (number  of  bits  in  length) 

greater  than  the  implementation  specific  bits  per  byte,  only  the 
rightmost  bits  of  the  byte  are  used  to  define  the  encoding;  if  the  size 
is  less  than  oj  ,  as  many  bits  with  value  0  are  added  to  the  left  to 
make  a  bit  pattern  in  length. 

Regarding  the  scope  of  a  chorcode ;directive;  The  effect  begins  at  that  point  in  the 
source  code  where  the  directive  appears  and  terminates  at  the  TERM  statement  or  at 
the  next  charcode:directive  with  the  same  charcode:letter,  whichever  comes  first. 

An  example  of  a  chorcode ;di re ctive  will  be  given  in  which  Standard  Transmisscm  Code 
is  defined  in  terms  of  hollerith: 

•CHARCODE  T  1H(  ) 

BEGIN  1H(  )  =  0(0),  1H(A)=0(6), 

1H(B)  =  0(7),  1H(C)  =  0(10), 
lH(D)  =  0(n),  1H(E)  =  0(12), 

1H(F)  =  0(13),  1H(G)  =  0(14), 

1H(H)  =  0(15),  IH(.l)  =0(16), 

1H(J)  =  0(17),  1H(K)  =  0(20), 

1H(L)  =0(21),  1H(M)  =  0(22), 

1H(N)  =  0(23),  1H(0)  =  0(24), 

1H(P)  =  0(25),  1H(Q)  =  0(26), 

1  H(R)  =  0(27),  1  H(S)  =  0(30), 

1H(T)  =  0(31),  1H(U)  =  0(32), 

1  H(V)  =  0(33),  1  H(W)  =  0(34), 

1H(X)  =  0(35),  1H(Y)  =  0(36), 

1H(Z)=0(37),  1  HO)  =  0(40), 

1H(-)  =  0(41), 

1H(+)  =  0(42),  1H(=)  =  0(44), 

1H($)  =  0(47),  1H(*)  =  0(50), 

1H(()  =  0(51),  1H(,)  =  0(56), 


24 


1H(0)  =  0(60),  1H(1)  =  0(61), 

1H(2)  =  0(62),  1H(3)  =  0(63), 

1H(4)  =  0(64),  1H(5)  =  0(65), 

1H(6)  =  0(66),  1H(7)  =0(67), 

1H(8)  =  0(70),  1H(9)  =  0(71), 

1  HO  =  0(72),  lH(/)  =  0(74), 

1H(.)  =  0(75)  END  $ 

The  above  example  shows  how  a  charcodeidirective  may  be  used  to  define  a 
"standardized"  character  set  and  encoding  scheme  for  interchange  between  both 
human  and  mechanical  processors  —  another  example  might  have  shown  a  definition 
for  the  ASCII  code.  The  following  brief  example  shows  a  charcode:directive  for 
defining  an  "inverted"  collating  sequence  for  the  digits  0  through  9: 

■CHARCODE  Q  1  H(0) 

BEGIN  1H(0)  =  0(11),  1H(1)=0(10), 

1H(2)  =  0(7),  1H(3)  =  0(6), 

1H(4)=0(5),  1H(5)  =  0(4), 

1H(6)  =  0(3),  1H(7)  =  0(2), 

1H(8)  =0(1),  1H(9)  =  0(0)  END  $ 

3. 2. 2. 4  Operations  on  Literal  Data 

3. 2.2.4. 1  Literal  :Assignment:Statements 

Literal :assignment:statements  have  the  form: 

literal  :variable  9  =  9  literal  iformula  9  $ 

where  literal  :for  mu  la  is  either  a  literal  ivariable,  a  literaliconstant,  a  literal  rfuncti  on, 
an  octal :constant  or  a  hexadecimal :constant.  Note  that  a  literal rvariable  or  a  literal; 
constant  means  either  a  hollerith:variable  or  hollerith;constant  or  a  variable  or  constant 
defined  with  respect  to  a  charcode;direcrive . 

If,  in  a  literal  :assignment:statement,  both  literal  ivariable  and  the  evaluated  literal: 
formula  have  the  same  length,  the  following  facts  apply: 

•  No  conversion  of  one  literaliitem  type  to  another  takes  place  if 
literal :variable  and  literolrformula  are  either  both  hollerith  or  both 
defined  with  respe ct  to  the  same  charcodeidirective,  or  if  I Uera I  iformula 
is  a  hexadecimal iconstant  or  an  octal rconstant. 

•  Otherwise,  a  conversion  takes  place,  byte  by  byte,  according  to  the 
one  or  more  charcode:di recti ves  which  may  be  involved. 
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A  I iteral ;formula  byte  Is  converted  to  a  llterahvarlable  byte  In  the  following  way: 

First,  it  is  determined  if  the  bit  string  content  of  the  literal rformula  byte  is  a  member 
of  the  bit  string  set  of  the  encoding  scheme  associated  with  the  literal  :formula .  If  not, 
the  corresponding  I Iteral rvarlable  byte  Is  filled  with  the  bit  string  representation  of 
the  fil Itcharacter  associated  with  the  literal ivariable .  If  the  bit  string  content  of  the 
literal tformu la  b"yte  is  a  member  of  the  encoding  scheme  associated  with  the  literal: 
formufg.  It  is  determined  if  the  character  from  the  character  set  associated  with  the 
literal iformula  which  correspondes  to  this  bit  string  is  also  a  member  of  the  character 
set  associated  with  the  literal  -.variable  .  If  so,  the  I  Iteral  :varlable  byte  Is  filled 
with  that  bit  string  from  the  encoding  scheme  associated  with  the  literal  :varlable  which 
corresponds  to  this  character.  If  not,  the  literal  ivariable  byte  is  filled  with^he 
flllicharacter  bit  string  associated  with  the  literal:variable .  Note  that,  by  definition, 
tlie^fllhcharacter  associated  with  the  hollerith  character  set/encoding  scheme  is  a  space . 

If,  in  literal rassignmentrstatements,  a  literal rvariable  is  shorter  than  the  evaluated 
literal  rformula,  excess  bytes  are  truncated  starting  at  the  left  for  the  purposes  of 
assignment.  (Conversions  are  made  as  required.)  If,  In  literal  :assignment:statements, 
literal  rvariable  Is  longer  than  the  evaluated  literahformula,  excess  bytes  of  literal: 
variable  are  TiTTed  with  the  fil  I  rcharacter  associated  with  the  literal  rvariable . 
(Conversions  are  then  made,  as  required.) 

Note  that  in  procedure  real  I  rstatements,  assignments  of  I  Iteral  iformulas  used  as 
actual rinputrparameters  to  formarrinputrparameters  takes  place  according  to  the 
above  rules,  as  do  assignments  of  I  Iteral  rformulas  to  actual  routputiparameters. 

3. 2.2. 4. 2  Literal  Comparisons 

Comparisons  of  literal  data  are  effected  by  means  of  I  iteral  :relatIonal  rformulas  of  the 
form: 


literairformula  0  relational  rope  rator  0  literahformula 

(Note  that  "chained"  relational  rformulas  may  also  be  used  —  the  description  above 
Is  used  for  simplicity  and  applies  to  the  chained  case  by  extension.) 

When  a  literairrelatlonahformula  is  evaluated,  first  the  I  iteral  rformulas  are  evaluated. 
Then,  if  one  of  the  I  iteral  rformulas  is  of  a  literal  type  different  from  the  other,  both  are 
converted  to  hollerith  character  strings,  and  the  literairrelatlonahformula  is  evaluated  by 
comparing  the  hollerith  strings.  Otherwise,  no  conversion  is  made.  (No  conversion  takes 
place  if  either  literahformula  Is  an  octal:  ora  hexadecimaheonstant .)  The  I  iteral  rformulas 
so  evaluated  are  compared.  In  effect,  byte  by  byte  from  left  to  right.  This  Is  not  meant 
to  imply  that  Implementations  are  required  to  perform  actual  byte  by  byte  comparisons, 
but  a  given  implementation's  means  of  comparison  must  yield  the  same  result. 
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One  byte  is 


equal  to 
less  than 
greater  than 


anather  byte  according  as  the 


bit  pattern  of  the  first  byte  is 


equal  to 
less  than 
greater  than 


the  bit  pattern  of 


the  second  byte,  where  both  bit  patterns  are  treated  as  unsigned:integers, 
bits  in  length  . 


Two  literal ;formulas  of  the  same  length  are  compared  from  left  to  right,  a  byte 
at  a  time.  The  two  formulas  are  equal  if  all  bytes  are  equal .  Otherwise,  the 
literal  rformula  on  the  left  of  the  relational  :operator  is  (  less  than  the 

I  greater  than  f 

literal  iformula  on  the  right  of  the  relational  raperatar,  if  the  byte  by  byte  comparison 
finds  at  some  byte  position,  that  a  byte  in  the  left  literal  iformula  Is  (  less  than  \  the 

I  greater  than  / 

corresponding  byte  in  the  right  llteralifarmula . 


If  the  two  literaliformulas  are  of  differing  lengths,  the  following  rules  apply: 

•  If  the  shorter  I  Iteral  iformula  Is  an  octaliconstant  or  hexadecimal -.constant, 
it  is  made  ta  be  the  same  size  as  the  farger  by  adding  the  apprapriate 
number  of  zero  bits  at  the  left  of  the  shorter  llterahfarmula . 

•  If  the  shorter  I  Iteral  iformula  is  not  an  octaliconstant  or  a  hexadecimal: 
constant  it  is  made  to  be  the  same  size  as  the  larger  by  adding  one  or  more 
fil  licharacters  of  the  associated  character  set/encoding  scheme  at  the 

left  of  the  shorter  literal  iformula  . 

Once  the  two  literaliformulas  are  made  the  same  size,  they  are  compared  according 
to  the  scheme  described  above  for  literaliformulas  of  the  same  length.  When  evaluated, 
a  literalirelatlonaliformula  yields  the  value  "true"  if  and  only  if  the  relatlonalioperator  is 


EQ 

equal  to 

NQ 

less  than,  greater  than 

LS 

and  the  camparisan  yields 

less  than 

LQ 

equal  to,  less  than 

GR 

greater  than 

GQ 

equal  to,  greater  than 

Otherwise,  the  literalirelatlonaliformula  yields  the  value  "false". 

3. 2.2.4. 3  Byte 

When  BYTE  operates  on  a  namedillteralivariable  a  literal  ivariable  Is  produced  with  the 
same  type  as  the  namediliteralivariable  operand.  If  the  namedillteralivariable  is  of  type 
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Hollerith,  so  is  the  BYTE  literahvarlable ,  If  the  namedriiteral  ;varlable  Is  of  a 
type  declared  In  a  charcoderdirective ,  the  BYTE  literal rvarioble  Is  of  the  same  type. 

3. 2. 2. 5  Computer  Representation  of  Numeric  Constants  and  Variables 

The  functional  characteristics  of  all  manipulations  Involving  numeric  constants  and 
variables  are  described  in  terms  of  a  signed  magnitude  representation.  The  implementor's 
representation  need  not  be  signed  magnitude,  but  the  implementor's  representation 
should.  In  essence,  cause  the  program  and  the  computer  to  impinge  upon  the  environment 
in  the  same  way  as  would  occur  if  the  actual  representation  were  signed  magnitude. 
However,  it  Is  recognized  that  It  Is  Infeasible  in  practice  to  ensure  a  signed  magnitude 
equivalent  effect  In  all  areas.  For  example,  an  implementor  using  a  one's  complement 
fixed  point  representation  may  decide  that  the  cost  of  guaranteeing  that 

BIT($1,5$)  (ALPHA) 

will  produce  the  magnitude  of  the  integer  ALPHA  as  declared  by 

ITEM  ALPHA  I  6  S  $ 

Is  not  warranted  by  the  compatablllty  which  would  be  gained  Implementors,  then,  may 
depart  from  a  total  signed  magnitude  simulation,  but  in  doing  so  must  publish  warnings 
where  these  departures  are  concerned. 

3. 2. 2. 6  Precedence  of  the  Unary  Operators 

The  precedences  of  the  arlthmeticioperators  In  the  evaluation  of  a  numericiformula, 
from  highest  to  lowest  will  be  changed  as  follows: 


Current 

New 

Unary- 

** 

*  * 

Unary  - 

V 

V 

+  - 

+  - 

Note  that  this  means  that  -  x**2  =  -  4  when  x  =  2  not  +  4.  The  precedences 
of  the  arithmeticioperators  complies  with  the  conventions  of  algebra. 

3. 2.2.7  Extendedrdefinerdirective 

This  facility  extends  the  capability  of  the  deflne:directlve  in  that  It  allows  the 
programmer  to  Include  a  parameter  list  with  the  defined  name. 
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3. 2. 2. 7.1  Form  of  the  Extended:define:directive 


An  extended:deflne:directlve  means  either: 

DEFINE  0  name  0  "symbols"  0  $ 


or 


DEFINE  0  name  0  (0  formal :define:parameter:list  0)  0  "symbol"  Q  $ 

A  formal  !define:parameter:list  is  either  a  formal  rdefinerpara meter  or  a  formal -.define: 
parameter:llst  0  ,  0  formalTdeflnerparameter.  A  formal  :clef  me:  para  me  ter  Is  a  name. 

Symbols  denotes  a  string  of  one  or  more  of  the  JOVIAL  symbols  and  space  or  spaces.  Note 
that  two  consecutive  primes  are  not  allowed  In  the  symbolsTtrl ng;  also  the  last  symbol 
before  the  second  set  of  primes  must  not  be  a  prime. 

Note  that  no  comment  may  appear  In  the  extended;deflne :dl recti ve  between  the  right: 
parenthesis  and  the  first  "  .  The  names  making  up  the  formal :deflr^:parameter:llst  must  be 
unique  within  the  formal ;deflne;parameter;l  1st  but  may  appear  anywhere  else  in  the  program 
in  any  context  whatever. 

A  name  appearing  in  a  formal:define:parameter:IIst  serves  no  other  purpose  than  to 
define  an  argument  for  the  extendedrdeflne-.directive  .  Formal :define :parameter:l  1st 
names  may  each  appear  any  number  of  times  (or  not  at  oTI)  Inside  the  quoted  string  of 
symbols  appearing  with  the  formal  :define:parameter:list  In  the  extended:define:dlrectlve . 

3. 2. 2.7.2  Scope  of  the  Definition 

The  scope  of  the  definition  of  an  extended:define:directive  begins  at  that  point  in  the 
source  text  where  it  occurs  and  ends  at  the  end  of  the  program  (TERM)  or  at  some  subsequent 
point  where  another  extended:deflne:dlrectlve  with  the  same  defined:name  occurs,  or  where 
a  definerdirective  with  the  same  defined:name  occurs.  Note  that  the  scope  of  a  define: 
directive  terminates  at  a  subsequent  point  in  the  program  where  an  extended:define:directive 
for  tTie  same  name  occurs. 


3 . 2 . 2 . 7 . 3  Extended:defi  ne  :Invocation 

An  extended:defIne:invocation  has  the  form 

deflned:name  0  (0  actual:deflned:parameter:list  0) 


or 


deflned;name  0  (0) 
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and  may  appear  anywhere  within  the  scope  of  the  extended:define:dlrective  with 
which  definedrname  is  associated  except  within  another  extended:define:directive  • 

Note  that  the  extendedrdefineiinvocation  is  not  recognize^as  such  when  it  appears 
within  a  statusrconstant,  a  cocrment,  or  I iteral :constant. 

An  actual :define:parameter;list  is  actual  idefine ’.parameter  or,  actual  :de fine :parameter:list 
0  ,  9  actual:  define;  para  me  ter. 

An  actual  ;define;parameter  is  "symbols" . 

Symbols  denotes  a  string  of  one  or  more  of  the  JOVIAL  symbols  and  space  or  spaces. 

Note  that  two  consecutive  primes  are  not  allowed  in  the  symbols  string;  also  tne  last 
sign  before  the  second  set  of  primes  must  not  be  a  prime. 

If  the  actual :formal;parameter:l  1st  contains  a  larger  number  of  actual :define;para meters 
than  there  are  formal ;deflne:para meters  in  the  formal ;deflne;parameter;list,  the  right 
most  excess  actual:deflne;para meters  are  Ignored.  If  the  number  of  formal :define: 
parameters  exceeds  the  number  of  actual ;deflne:parameters,  the  right  most  missing 
actual :d^ne;parameters  are  assumed  to  be  "space".  In  either  case  a  warning  to  the 
programmer  will  be  generated . 

The  effect  produced  by  an  extended:defIne:invocation  is  as  follows: 

1)  A  copy  of  the  quoted  symbol  string  associated  with  the  extended: 
deflne:dlrective  Is  made, 

2)  Each  forma  I '.define:  para  meter  appearing  in  the  copy  is  replaced  with 
the  symbols  of  Its  correspondent  actual :define:parameter,  and 

3)  The  extended:defIne:invocation  is  replaced  by  the  expanded  copy. 

At  this  point  the  compiler  will  process  the  expanded  copy  at  its  leftmost  space,  spaces, 
or  symbol  In  exactly  the  same  way  as  If  it  were  part  of  the  source  text  being  Input  from 
the  source  text  input  unit.  A  name  which  followed  DEFINE  in  a  (currently  active) 
deflne:dl recti ve  which  now  appears  In  the  expanded  copy  Is  treated  at  the  time  It  Is 
encountered  in  exactly  the  same  manner  as  It  would  be  treated  had  It  appeared  In  the 
source  text  input  stream.  The  same  is  true  for  extended :define;invocations,  defi ne: 
directives,  and  extended:deflne:directlves  which  may  have  appeared  in  the  expanded 
copy. 

Note  that  names  appearing  after  DEFINE  in  a  define: directive,  extended:deflne: 
invocations,  defi ne:dl recti ves,  and  extended:define:dlrectives  may  appear  In  the 
expanded  copy  produced  byan  extended:deflne:dlrective .  As  with  the  use  of  a  define: 
directive,  the  use  of  an  extended:define  :di  recti  ve  must  not  result  In  circular  definitions. 
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Note  that  ihe  symbols  making  up  an  actual ;deflne;parameter^  as  well  as  the  symbols 
in  the  symbols  string  of  an  exte nded ;deflne;di recti ve^  may  contain  names  which  appeared 
after  DEFINE  In  a  (currently  active)  define;di recti or  deflne;dlrectlves,  or  extended: 
definerdirectives,  or  extended:define:invocation$.  These  naiDes,  directives,  or  invocations 
are  treated  simply  as  symbols  in  this  context  and  do  not  produce  replacements  or  expanded 
copies  until  after  the  expanded  copies  replace  the  extended:define:Invocations  which 
produced  them. 

Example: 


The  extended:define:directive 

DEFINE  AA  (XX,  YY,  ZZ)  "  BB  (S  SI N(ZZ),  YY,XX$)  +  XX  "  $ 


causes 


CC  =  BETA+AA  ("PI",  "P2",  "P3+P4")  $ 
to  be  "read"  by  the  compiler  as 
CC  =  BETA  + 

BB  ($  SIN  (P3+P4),  P2,  PI  $)  +  PI  $ 

3, 2.2. 8  Extended  Mode  Directive 

This  facility  extends  the  modeidirective  of  AFM  100-24  In  that  it  allows  the 
programmer  to  select  an  item:description  for  an  undeclared  name  on  the  basis  of  the 
first  letter  of  that  name.  The  form  of  an  extended:mode:directive  is  MODE  0 
extended:mode:list  0  $. 

An  extended:mode:list  is 

extended:mode:l  ist:element  0 , 0  extended:mode:l  Istrelement 


or 


extended:mode:l ist  0  ,  0  extended:mode:list:element 

An  extended:mode;l istrelement  is  either  a  letter:mode:specification  or  a  simplermode; 
specification;  the  latter  must  appear  as  an  extended:mode: I  istrelement  in  the  extended: 
modeTTirr^uF  it  must  appear  only  once. 
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A  slmple;mode;specifi cation  is  either  Itemidescription  or  Itemidescriptlon  9  P  0 
optional  ly;slgned;constant . 

A  letter; moderspecifi cation  is  letter  0  =  0  simple;mode;specification . 

If  more  than  one  I etter:mode;specifi cation  appears  as  an  extended ;mode:list;element/ 
the  letters  in  these  letter:mode:speci fictions  must  be  distinct. 

The  scope  of  effect  of  an  extended:mode:directive  beings  at  the  place  in  the  source 
text  where  it  appears  and  ends  as  the  end  of  the  program  (TERM)  or  at  the  next 
mode ;di recti ve  or  extended;mode;directive.  Any  name  appearing  within  the  scope  of 
the  extended:mode;directive,  which  has  not  been  formally  declared  elsewhere  is  acted 
on  by  the  extendedrmoderdirective  in  the  following  ways:  If  the  first  letter  of  the  name 
matches  a  letter  appearing  ^n^ne^  of  the  letter; mode :specifi cations^  the  name  is 
automatical  ly  declared  as  an  item  with  the  assocTated  simple;mode;specification^  otherwise, 
"free  standing"  simple;mode;  specification. 

Note  that  an  extended  ;mode;di  recti  ve  serves  to  terminate  the  scope  of  effect  of  any 
mode;directive  which  occurred  previously  in  the  source  text. 


Example: 

The  following  extended:mode:directive  will  mode  declare  all  undeclared  names  in  its 

scope  beginning  with  I,  J,  K,  L,  M,  or  N  as  integer:items  and  all  other  undeclared 

items  in  its  scope  as  floating. 

MODE  I  =  I  40  S,  J  =  I  48  S,  K  =  I  48  S 
L  =1  48S,M  =  I  48S,  N  =  I  48  S, 

F  $ 

The  following  two  examples  are  equivalent  to  the  extended:mode:directive  above: 

MODE  F,  I  =1  48S,  J  =  l  48S 
K  =  I  48  S,  L  =  I  48  S, 

M  =  l  48S,  N  =  l  48S  $ 

MODE  I  =  I  48  S,  F,  J  =  I  48  S, 

K  =1  48  S,  L  =  1  48  S, 

M  =  I  48  S,  N  =  I  48  S  $ 

3. 2. 2. 9  Alternate  Entrances  to  Procedures  and  Functions 

Frequently  it  is  desirable  to  enter  a  procedure  (or  function)  at  some  point  other  than  the 

beginning.  This  facility  provides  such  a  capability. 
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3. 2.2.9. 1  Alternate:  Procedure:  Entrance:  Declaration 


An  alternate; procedure lentra nce;declaratian  has  the  farm 
'ENTRANCE  0  alternate ;entrance;na me  0  $ 
ar 

'ENTRANCE  0  alternate:entrance:name  0 

(0  o  pt  i^naT;f  or  mg  I ;  I  npu  t ;  pa  ra  me  te  r ;  I  i  s  t  0)  0  $ 

or 

' E NTRA NC E  0  alternate;entrance;name  0 

(0  aptionahformal :input:parameter:llst  0  =  0  formal :output:parameter: 
list  0)  0  ^ 

An  alternate;entrance:name  Is  a  name . 

An  alterna te:procedure;entrance;declaratIan  is  meaningful  aniy  if  it  appears  In  a 
pracedure:declaratian  ar  a  functian:declaratian,  either  in  the  pracedurezheading  ar 
procedurezbady  gf  those  declarations.  (The  containing  procedure zar  functianzdeclaration 
is  called  the  master:declaratian.) 

As  many  a  I  ter  note :  procedure  zentrance  zdeclaratlons  as  desired  may  be  made  within 
a  master: declaration^ 

Far  each  name  declared  as  an  alternate  entrance  by  an  alternatezprocedurezentrance; 
declaratlan^  there  must  be  a  matching  statementzname  within  the  procedure;  or  function; 
body  part  of  the  masterzdeclaration.  The  position  af  this  statementzname  in  the  body 
defines  the  paint  af  entry  Into  the  body  when  the  procedure  ar  function  is  Invoked  by  Its 
alterna  tezentrancezna  me . 


Any  alternate:procedure:entrance:declaration  must  occur  prior  to  its  associated 
state  mentTIoEeL 


Nate  that  there  must  not  be  a  statementzname  In  the  body  of  the  masterzdeclaration 
which  is  the  same  as  the  name  defined  as  a  procedure:  ar  function;  no  me  of  the  master: 
declaration. 


Formal  zparameterznames  associated  with  an  alternate zprocedurezentrancezdeclaratlon  may 
appear  as  formal zparameterznames  in  the  masterzdeclaration  ar  In  any  other  alternate; 
procedure zentrancezdeclaratian;  formalzinputzparameters  In  any  one  such  declaration  may 
be  formal zautputzparameters  In  any  atber  such  decfaration,  and  vice-versa. 
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However,  as  with  procedure ;cleclarations,  names  appearing  as  formal ;para meters  in  any 
alternate  :procedure;entra  ncerdeclaration  may  be  forma  I  ;input;  parameters  or  formal: 
output:  para  meters,  but  not  both. 

All  formal  :para  me  ter;  names  (other  than  statement  or  close;names)  whether  they  appear 
in  the^nasterideclaration  or  in  alternate ;procedure;entra nee ;declarations,  must  appear 
i  n  da  ta  ;de  cl  a  ra  t  i  on  s  pr  i  or  to  their  fTrst^ference  in  the  body  of  the  mast^;declaration. 

Note  that,  with  respect  to  the  main;program,  an  alternate;entrance;name  is  a 
global  Category  3  name.  That  is,  it  may  only  be  referenced  in  an  alternate;procedure; 
call  or  in  an  alternate;function;cal I  and  is  not  regarded  as  a  statement:name . 

From  within  the  body  of  the  master ;declarati on,  a  statement: name  which  matches  an 
alternate  :entrance:name  is  treated  as  a  local  state  me  nt:name  when  it  appears  as  a 
switchzdesignator  or  as  the  object  of  a  GOTO. 

(Note  that  a  I  ternate;procedure  ".entrance:  declarations  can  be  embedded  in  function: 
declarations  as  well  as  procedure;declarations.) 

3. 2. 2. 9. 2  Alternate  Procedure  Calls 

The  form  of  an  a  I  terna  te ;  procedure  :ca  1 1  is  precisely  like  that  of  a  procedure;call, 
and  the  same  restrictions  as  to  the  matching  of  number,  position,  and  type  of 
formal :parameters  with  actual ;para meters  apply.  Prior  to  entry,  actual ;Input:parQ meters 
are  evaluated  as  required  and  bound  to  formal  ;input;parameters.  Then,  control  is^ssed 
to  the  associated  statement: name  within  the  body  of  master;declaration. 

At  this  p  ^int,  execution  takes  place  in  exactly  the  same  manner  as  occurs  when  a  procedure 
with  no  alternate:procedure;entrance;declaratlons  embedded  in  Its  declaration  is  invoked. 

If  the  flow  of  execution  causes  reference  to  be  made  to  a  formal ;parameter  which  is  not 
a  formal iporameter  of  the  alternate;procedure;entrance;dec]aratIorraTsociated  with  an 
alternate;procedure;call ,  then  such  a  reference  is  undefined. 

On  normal  exit  (exit  achieved  by  other  than  a  direct  or  Indirect  transfer  to  a  main;program; 
statement; name  not  an  actual  ;pQra meter),  formal;output:parQmeters  associated  with  the 
entrance  invoked  are  bound  to  their  actual  :output;parameters,  and  control  Is  returned  as 
It  would  be  from  a  procedure  or  a  function  with  no  alternateTprocedure;entrance;calls 
embedded  in  its  declaration. 

3. 2. 2. 9. 3  Alternate:  Function:  Entrance:  Declaration 

An  alternate:functIon;entrance:declaratIon  has  the  same  form  as  an  alternate:procedure: 
entrance:declaration  except  that  no  formar;output;parameter;IIst  Is  allowed;  also  an  item 
with  the  same  name  as  the  alternate:functIon:entrance;name  must  be  declared  prior  to  Its  first 
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reference.  Otherwise,  all  the  rules  applying  to  alternate;procedure:entrance:declaratIon$ 
apply  to  al ternate:functIon:entrance:declarations^  (Note  that  alternate:function:entrance: 
declarations  may  be  embedded  in  proceck7re;decrarations  as  well  as  function:declarations.) 


3. 2. 2. 9. 4  Alternate  Function  Calls 

The  form  of  an  alternate:function;call  has  the  same  form  as  a  functlonrcall .  All  remarks 
regarding  actions  initiated  by  an  alternate:function:call  parallel  the  remarks  made  regarding 
alternate; procedure ;calls  except  those  involving  the  binding  of  output:parameters;  exit 
in  this  case  results  in  the  "replacing"  the  alternate:function:cal I  with  the  value  output 
as  a  result  of  that  call . 

3. 2. 2. 9.5  Example 

PROC  CFM  (FEET  =  MILES)  $  "CONVERT  FEET  TO  MILES" 

ITEM  FEET  F  $ 

ITEM  MILES  F  $ 

’ENTRANCE  CMF  (MILES  =  FEET)  $  "CONVERT  MILES  TO  FEET" 

BEGIN 

ITEM  FEET  'PER'  MILE  F  P  5280.0  $ 

MILES  =  FEET/FEET  'PER'  MILE  $ 

RETURN  $ 


CMF. 


FEET  =  MILES  *  FEET  'PER'  MILE  $ 


END 

3.2.2.10  Extended  Precision 

Many  computers  programmed  with  JOVIAL  have  "double"  precision  hardware  capabilities. 
In  Standard  J3,  no  means  exist  for  making  use  of  such  capabilities.  The  feature  described 
in  this  paragraph  permits  specification  of  an  extended  precision  floating -.point:  item.  It  is 
expected  that  the  great  majority  of  command  and  control  extended  precision  computational 
requirements  can  be  met  by  an  extended  precision  floatingrpoint  facility  and,  therefore,  no 
extended  precision  fixed-.point  or  integer  capabilities  are  proposed;  further.  It  is  assumed 
that  the  exrad  of  an  extended  precision  flog  ting;  point:  number  is  the  same  size  as  the  exrad 
of  an  ordinary  floating  point  number. 

f>  is  used  to  denote  the  implementation  dependent  number  of  bits  in  the  signicand  of  the 
extended  precision  floating; point: number .  o'  is  used  to  denote  p  -1  .  The  number  of 
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bits  per  exrad  of  both  ordinary  and  extended  precision  floating  numbers  is  represented  by 
S  .  The  adjective  extendedtprecislon  will  be  used  to  describe  extended  precision 
floatingtpoint  data  and  the  adjective  ordinary  will  be  used  to  describe  floatingtpolnt  data 
which  are  not  of  extended  precision. 

Descriptions  for  all  ordinary;f looting  attributes  will  be  found  in  AFM  100-24  wherever  the 
floating  adjective  is  used  in  that  document. 

Neither  adjective  will  be  used  if  it  Is  clear  from  the  context  which  kind  of  floatingtpoint 
is  meant  nor  will  adjectives  be  used  if  it  is  clear  from  the  context  that  either  or  both 
kinds  are  meant. 

3.2.2.10.1  Constant  Form 

The  form  of  an  extended ;precisi on ;f I oating;constant  Is  ordinary;floating;consta nt  D. 
Examples  are; 

3.D 

3.141 59D 
.14159D 
3.14159E-10D 
.14159E-10D 
3.E-10D 

3.2.2.10.2  Declaring  Extendedrpreclslontf  I  gating;!  terns 

Extended;precision;floatIng;Items  are  declared  in  Item;,  array;,  and  table; 
declarations  by  means  of  the  exte'nded;precisIori;floating;Item:descrIption,  the  form 
which  is  either 

F  0  D 
or 

F  0  D  e  R 

(Where  R  specifies  rounding  on  assignment  to  the  declared  datum.) 

3.2.2.10.3  Computer  Representation  of  Extended;FloatIng  Constants  and  Variables 

Extended;precision:floatIng;constants  and  extended;floating;items  are  represented  as  two 
signed  numbers.  The  signicand  Is  represented  in  p  bits;  the  exrad  in  bits. 
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3.2.2.10.4  Numericrformulos  ond  Numericrossignment 


A  unary  arithmeticroperotor  (unary  minus,  obsolute  value)  operating  on  on  extended: 
pre  c  i  si  on :  f  f  oaf i  ng  ^o  r  i  at)  IT" produces  an  extended:precision:fl  gating  result.  A  binory 
orithmetic rope ra tor  between  two  operonds,  one  of  which  is  extended tprecisi on :f looting 
produces  an  intermediote  result  which  is  extendedrprecisionrf  I  gating  .  Thus,  on 
exte  nded :  pre  ci  si  on  :fl  gating  result  is  generated  if  one  operand  is  ordinoryrfloating  ond  the 
other  exte  nded  rprecisionif  I  gating. 

All  colculotions  in  exte  nded  rprecisionif  I  gating  form  ore  truncoted  to  (f  significont 
bits  unless  the  stotement  colls  for  roundW  ossignment.  Then,  eoch  colculation  is  carried 
out  to  p  significont  bits  ond  rounded  by  odding  the  extra  bit  into  bit  co  ,  discarding  the 
extra  bit,  and  renormalizing  if  necessory.  The  result  of  the  rounding  must  be  to  produce 
the  same  effect  os  ordinaryrfloating  rounding  requirements,  i.e,,  rounding  must  either 
produce  the  some  volue  os  would  be  obtoined  by  truncotion  or  else  put  the  volue  further 
from  zero. 

Necessory  conversions  between  extendedrfloating  integer  and  fixed  dato  ore  corried 
out  outomaticolly  when  these  doto  appeor  os  operands  in  o  numericrformulo  or 
numeri  crassignment  rstotements . 

All  remorks  opplying  to  ordinaryrfloating  dato  in  numericrformulos  ond  numeric: 
assignmentrstotements  not  specifically  contradicted  by  the  remorks  obove  apply  to 
exte  nded:  pre  ci  si  on  :fl  gating  dato  os  wel  I . 

3.2.2.10.5  Relotional  Operotions 

When  o  fixed,  integer,  or  ordinaryrfloating  operand  appeors  on  either  side  of  o 
relational  rope  rotor  ond  the  other  operond  is  extendedrprecisionrfloati  ng,  the  fixed, 
integer  or  ordinaryrfloating  operond  is  converted  to  extendedrprecisionrflooting  for 
the  purposes  of  the  comparison. 

3.2.2.10.6  Allocation  of  Extendedrprecisionrflootingritems 

Simplerextendedr  precision. ■flog  ting  rite  ms  ore  ollocoted  os  many  full  S  bit  consecutive 
words  as  ore  required  to  contoin  the  items  bits.  Any  remaining  bits  in  the 

contoiner  ore  set  to  zero. 

Each  element  of  an  ex  tended  rprecisionif  I  gating  rorroy  is  ollocoted  space  in  the  same 
manner  os  for  si mpl elexte nded rpreci si onrfloa ting; items .  Extendedrprecisionrfloatingr 
items  which  oppeor  in  o  non-packed  ordTn^ryitable  ore  ollocoted  space  in  the  same  manner 
os  simplerextendedrprecisionrfloatingiitems .  Medium-packed  ond  dense-packed  ordinary: 
tobies  may  couse  extendedrprecisionrf loatingritems  to  cross  word  boundories.  This  is  true 
for  definedrentryrtables  os  well .  Parallel  structuring  of  tables  may,  of  course,  couse  parts 
of  extendedrprecisionrf  loatingritems  to  be  placed  in  non-consecutive  words. 
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3.2.2.11 


JOVIAL  Input/Output  Module 


The  proposed  standard  JOVIAL  Input/Output  MODULE  (JIO)  consists  of  four 
submodules:  A  file  manipulation  submodule  (JFILE),  a  submodule  which  permits 
l/O  devices  to  be  controlled  by  the  programmer  (JDEV),  a  formatting  submodule 
(JFORMAT),  and  a  service  routine  submodule  (JSERVICE).  All  submodules  except 
JSERVICE  consist  of  formal  language  features.  JSERVICE  Is  composed  of  a  set  of 
routines  prepared  to  satisfy  the  requirements  of  a  specific  application  by  the  programmers 
of  that  application. 

In  the  descriptions  of  the  submodules  given  below,  reference  is  made  to  processors 
called  DPEP,  PFILE,  and  PFORM.  These  processors  serve  only  as  an  aid  in  the 
description  of  actions  taken  by  the  execution  of  certain  JIO  statements;  descriptions 
of  them  are  not  intended  to  be  taken  as  specifications  for  subroutines  which  must  be 
included  in  any  implementation  of  the  standard. 

3.2.2.11.1  JDEV 

The  features  in  JDEV  consist  of: 

•  device  procedures 

•  device:procedure:execution;statements 

•  a  device:procedure  execution  processor  (DPEP) 

Devices  are  external  equipments  or  other  processor/memory  configurations  and  are 
labeled  by  unique  non-negative  numbers.  Device  procedures  are  actions  or  set  of 
action  which  devices  may  be  commanded  to  perform.  "Rewinding"  and  "initiating  a 
read  operation"  are  examples  of  device  procedures  which  a  tape  transport  device  may 
be  commanded  to  perform,  for  example.  The  commanding  process  will  be  described 
subsequently  as  "assigning  a  device  procedure  to  a  device  for  execution". 

Device  procedures  are  implementation  dependent.  A  given  device  procedure  defined 
fora  given  installation  may  be  assigned  to  more  than  one  device  for  execution.  "Rewind" 
and  "initiate  read"  will  typically  be  executable  by  all  or  most  tape  drive  devices  in  a 
particular  installation. 

Device  procedures  may  have  both  input  and  output  parameters  associated  with  them 
much  in  the  same  manner  as  the  ordinary  JOVIAL  procedures  defined  by  procedure; 
declarations. 


Note  that  formal rinputtpara meters  and  formal routputtparo meters  associated  with  a 
device  procedure  are  of  the  some  type  as  formal ;Intput;para meters  and  formal routput; 
parameters  associated  with  ordinary  procedures. 
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A  device  procedure  is  assigned  to  a  device  for  execution  by  means  of  a  device rprocedure: 
executionrstatement  the  form  of  which  is 


‘EXECUTE  device:procedure:cal  I 
(?  device; number  $) 
optional  :completion:ca  1 1  $ 

A  device:procedure:cal  I  has  exactly  the  same  form  as  a  procecure :cal  I  :statement 
except  that  the  terminating  ”$"  of  the  procedureical  I  rstatement  does  not  appear; 
all  rules  relating  formal  rparameters  to  actual  rparameters  in  a  procedure:  cal  I  tstatement 
apply  correspondingly  to  a  device :procedure  real  I .  A  devicetproc^dure  :name  is  a  global 
Category  1  name.  (Category  1  ,  in  fact,  contains  only  device  rprocedure  :na  mes . ) 

Device:number  is  a  numericrformula  .  A  completionical I  is  either  a  closeiname  or 
procedure  real  I  where  procedure  real  I  takes  the  form  of  a  procedu  re  :ca  1 1  rsta  te  me  nt  without 
the  terminating  All  rules  relating  formal  rparameters  to  actual  rparameters  in  a 

procedure  real  I  rsta  te  me  nt  apply  correspondingly  to  procedure  realist 

DPEP  is  a  mechanism  which  provides  an  interface  between  devices  and  the  execution 
of  device  procedures  by  means  of  devicerprocedurerexecutionrstatements.  DPEP  must 
be  able  to  determine: 

•  The  status  of  each  device  at  any  time. 

•  The  set  of  device  procedures  which  may  be  executed  by  a  given 
device  (This  set  is  in  general  a  subset  of  the  set  of  all  possible  device 
procedures) . 

•  The  set  of  device  procedures  which  may  be  executed  on  a  device  when 
any  given  device  procedure  is  currently  being  executed  by  that  device. 

A  device  procedure  is  "currently  being  executed"  from  that  moment 
when  step  (d),  below,  is  entered  until  the  device  signals  completion  of 
execution  of  the  device  procedure  as  indicated  in  step  (g)  below.  (Note 
that  it  may  be  possible  to  execute  a  device  status  checking  device  procedure 
oh  a  device,  while  the  device  is  executing  another  device  procedure,  for 
example.)  A  device  is  said  to  be  "available"  to  a  device  procedure  if  that 
device  procedure  is  a  member  of  such  a  set  as  described  above;  otherwise, 
the  device  is  "unavailable"  to  the  device  procedure. 

Associated  with  each  device  procedure  is  an  "execution  time"  property.  Some  device 
procedures  (such  as  device  status  checking)  may  have  an  execution  time  of  zero  —  they 
execute  "instantaneously".  Other  device  procedures  have  a  non-zero  execution  time  -  - 
they  execute  "non-instantaneously " .  DPEP  is  designed  in  such  a  way  as  to  allow  the 
programmer  to  perform  processing  in  parallel  with  the  execution  of  non-instantaneous 
device  procedures  and  to  perform  interruption  processing  when  these  device  procedures 
have  signaled  completion.  It  is  the  implementor's  decision  which  of  the  device  procedures 
are  defined  to  be  instantaneous  and  which  are  to  be  non-instantaneous. 
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A  device ;procedure;execution;state merit  causes  the  following  operations  to  be 
pei^ormed: 


1)  Any  actual tinputrparometers  associated  with  the  device ;procedure;cal I  will 
be  evaluated  in  precisely  the  same  manner  as  actual ;input:parameters  are 
evaluated  in  a  proceduretcall  istatement. 

2)  The  device;number;numeric;formula  wiFI  be  evaluated  exactly  as  if  the 
numeric;formula  were  being  used  as  subscript. 

3)  The  DPEP  mechanism  will  perform  the  following  operations  in  the  order 
indicated: 

(a)  If  the  device '.number  does  not  correspond  to  any  of  the  device  rnumbers 
allowed,  DPEP  ceases  processing  and  returns  control  to  the  next  statement 
following  the  device;procedure:execution:statement.  (Attempt  to  execute 
the  device  procedure  results  in  a  no-operation) 

(b)  DPEP  determines  if  the  device  procedure  specified  in  the  dev  ice;  procedure: 
call  may  be  executed  by  the  device  specified  by  device ;number.  (A  device 
procedure  for  backspacing  a  tape  record  cannot  be  executed  on  a  card 
reader,  for  example)  If  the  device  procedure  cannot  be  executed  on  the 
device,  DPEP  returns  control  to  the  next  statement  following  the  device: 
procedure;execution;statement.  (Attempt  to  execute  the  device ;proce dure 
results  in  a  no-operation.) 

(c)  DPEP  determines  if  the  device  is  "available"  to  the  specific  device  procedure. 

If  not,  DPEP  returns  control  to  the  next  statement  following  the  device; 
procedure  execution:statement.  (Attempt  to  execute  results  in  a  no-operation.) 

(d)  If  the  device  procedure  specified  is  non-instantaneous,  DPEP  takes  all 
necessary  steps  to  regain  control  from  any  program  segment  which  may  be 
operating  when  the  device  signals  that  it  has  terminated  execution  of  the 
device  procedure. 

(e)  DPEP  assigns  the  device  procedure  to  the  device  for  execution.  If  the 
device  procedure  executes  instantaneously  on  the  device,  control  is  returned 
to  the  statement  following  the  de vice: procedure ;execution;statement.  Then, 
steps  (g)  -  (i)  are  never  entered^  If  the  device  procedure  is  non-instantaneous, 
control  is  passed  to  step  (f). 

(f)  DPEP  returns  control  to  the  statement  following  the  device  procedure; 
execution;statement . 

(g)  On  the  signal  (interruption)  from  the  device  that  it  has  completed  processing 
of  the  device  procedure,  execution  of  the  program  segment  currently 
operating  is  suspended,  DPEP  ensures  that  any  actual ;output;para meters 
associated  with  the  device  procedure  are  evaluated,  and  control  is  passed 
to  step  (h)  below. 

(h)  DPEP  evaluates  any  actual  ;input:parameters  associated  with  the  completion; 
call,  if  a  completion;call  was  supplied.  (Evaluation  takes  place  exactly  as 
If  the  completion;call  v^re  an  ordinary  procedure;call .)  If  no  completion; 
call  was  specified,  DPEP  resumes  processing  at  step  (i).  Otherwise,  the 
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close  or  procedure  specified  by  the  completiontcall  is  invoked  and 
DPEP  awaits  Its  termination.  Upon  termination  of  the  completiontcall 
execution,  DPEP  passes  control  to  step  (1). 

(i)  DPEP  returns  control  to  that  point  immediately  following  the  last 

execution  which  occurred  prior  to  regaining  control  on  the  termination 
signal  from  the  device.  Note  that: 

•  A  completion:cal I  associated  with  an  instantaneous  device  procedure 
is  never  operated  (see  step  "e"). 

•  If  the  completion:cal I  procedure  or  close  does  not  return  control  to  DPEP 
at  step  (g),  further  DPEP  processing  is  undefined. 

•  If  the  completionrcall  specified  invocation  of  a  close  which  was 
declared  within  a  FOR  statement  which  does  not  contain  the  device: 
procedure:execution:statement,  and  if  that  close  manipulates  the  loop: 
variable  defined  by  the  FOR  statement,  the  completion:call  invocation 
step  (g)  is  undefined. 

•  If  the  completion:cal I  specifies  invocation  of  a  procedure,  and  if  one  or 
more  of  the  actual :para meters  contains  a  loop:variable  then  the  device: 
procedure :execution:statement  must  appear  within  the  scope  of  definition 
of  the  I  oop:variables. 

Examples  of  device:procedure:execution:statements  are: 

'EXECUTE  REWIND  ($23$)  $ 

'EXECUTE  REWIND  ($1+7$)  $ 

"THE  ABOVE  TWO  STATEMENTS  WILL  REWIND  THE  TAPES  ON  DEVICES  23  AND 

1+7." 

'EXECUTE  DISKREAD  (DISKADDRESS,  MEMORY  'BUF,  BUF'LENGHT 

=  DISKREAD  'STATUS) 

($  DISKA  $)  INTRUPT'L( )  $ 

"THE  ABOVE  STATEMENT  CAUSES  A  READ  FROM  DISKADDRESS  TO  BE  I NITIATED.  THE 

DISKREAD  DEVICE  PROCEDURE  WILL  FILL  DISKREAD  'STATUS  WITH  A  VALUE  DESCRIBI  NO 

THE  STATUS  OF  THE  READ  ON  COMPLETION.  THEN  THE  PROC  INTRUPT'L  IS  OPERATED." 

3.2.2.11.2  JFILE 

The  file  processing  submodule,  JFILE,  consists  of  the  following  features: 

•  the  file:declaration 

•  file  manipulation  statements 

•  a  control  mechanism,  the  File  Processor  (PFILE) 

•  two  built-in  interface  procedures,  TLB  and  TBL 
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•  the  functional  ;modIfier  POS 

•  the  fu ncti ona I : modifier  *FILENUM. 

These  features  described  fully  In  3.2.2.11  .2.4  have  been  designed  and  organized 
In  such  a  manner  as  to  reflect  a  point  of  view  founded  on  a  specific  definition  of 
file,  and  on  the  notion  that  files  so  defined  have  both  "functional"  and  "represen¬ 
tational"  characteristics  which  can,  and  should  be  separated.  The  definition  of  file 
Is: 

•  a  collection  of  distinguishable  objects,  or  records,  called  a 
record  set,  and 

•  the  processes  by  which  records  in  the  record  set  are  stored  into 
and  retrieved  from  storage  media. 

A  file  characteristic  Is  "functional"  if  It  applies  to  a  record  set  or  storage/retrieval 
processes  Independently  of  particular  storage  media  and  transmission  devices.  A  file 
characteristic  is  "representational"  if  it  applies  to  particular  properties  of  a  record  set 
In  some  specific,  physical  storage  medium  or  if  it  describes  storage/retrieval  processes 
in  terms  of  some  specific,  physical  transmission  device.  JFILE  is  so  structured  as  to 
separate  the  functional  characteristics  of  a  file  as  completely  as  possible  from  the 
representational  characteristics,  thus  rendering  functional  processes  and  representation 
characteristics  independent. 

3.2.2.11  .2.1  The  Functional  File 

3.2.2.11  .2.1  .1  The  Functional  Record  Set 

Each  record  In  the  functional  record  set  Is  thought  of  as  a  "logical"  or  functional 
entity  independently  of  Its  relationship  to  any  other  information  group;  functional 
records  are  generally  defined  by  the  programmer  on  the  basis  of  certain  functional 
characteristics  of  his  program.  Each  (functional)  record  in  the  record  set  has  no 
particular  structure  and  is  composed  of  no  particular  type  of  Information  as  such.  The 
programmer  gives  structure  and  Information  type  to  a  record  by  the  manner  in  which  his 
program  deals  with  its  "main  memory"  Image. 

A  record  set  contains  n  functional  records,  where  n  is  some  finite  positive 
integer  or  0.  If  n=0,  the  record  set  is  called  "empty".  (In  practice,  the  programmer 
does  not  ordinarily  know  the  value  of  n.)  Associated  with  each  record  in  a  (non¬ 
empty)  record  set  is  a  unique  non-negative  Integer  k  which  comes  from  the  set 
k  (  k  =  0, . .  .,n-l)  where  n  is  the  number  of  records  In  the  record  set.  This  set  of 
numbers  is  called  the  functional  "reference  set". 

3.2.2.11.2.1.2  The  Functional  Storage/Retrieval  Processes 

This  paragraph  describes  the  referencing  process  consisting  of  four  basic  storage/retrieval 
processes  (Input,  Output,  Insert,  Delete),  and  two  processes  (Open,  Shut)  which  serve 
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to  initialize  and  terminate  other  storage/retrieval  processes.  When  "transmission" 
is  used  below  it  means  only  the  movement  of  information  and  implies  no  alteration  of 
that  information.  Thus,  transmission  of  a  record  image  from  the  main  memory  to  an 
external  storage  medium,  followed  by  transmission  of  the  same  record  back  to  main 
memory,  should  produce  an  identical  record  image  in  main  memory  if  the  transmission 
in  each  case  is  performed  under  the  same  set  of  conditions.  ("Main  memory"  refers  to 
the  storage  medium  which  contains  the  Invocation  command  for  a  storage/retrieval 
process.) 

Note  that  no  notions  of  transmission  initiation,  transmission  occurring  in  parallel 
with  computation,  and  interruption  on  completion  of  transmission  are  associated  with 
the  functional  storage/retrieval  and  Initialization/termination  processes,  though.  Indeed, 
any  representation  of  these  functional  processes  will  have  to  deal  with  such  notions. 

From  the  point  of  view  of  the  programmer,  the  execution  of  any  functional  process 
involving  a  transmission  causes  the  transmission  to  take  place  and  does  not  terminate 
before  the  transmission  is  completed;  also,  when  a  functional  storage/retrieval  or 
initialization/termination  process  completes  execution,  program  control  is  passed 
to  the  statement  following  the  process  invocation.  Further,  this  should  be  true  for 
any  representation  of  the  functional  processes. 

A  record  in  a  record  set  is  "referenced"  by  specifying  the  appropriate  Integer  k 
from  the  reference  set.  A  record  is  referenced  when  it  is  desired  to  use  it  as  an 
operand  in  a  storage/retrieval  process.  If  a  record  k  is  referenced  with  k(0) 
or  k(n-l)the  result  of  the  reference  is,  in  general,  undefined.  (With  respect 
to  the  basic  functional  storage/retrieval  processes  described  below,  this  will  be 
true  unless  explicitly  stated  as  otherwise.)  The  following  paragraphs  describe  the 
functional  processes: 

a)  "Input  record  k"  is  a  retrieval  process  which  causes  the  record  referenced 
by  k  in  the  record  set  to  be  transmitted  to  the  main  memory.  "Input 
record  k"  is  undefined  if  n=0,  i.e.,  if  the  record  set  is  empty. 

b)  "Output  as  record  k"  is  a  storage  process  which  causes  Information  to  be 
transmitted  from  the  main  memory  to  a  storage  medium.  If  the  record 
set  in  the  storage  medium  already  contains  a  record  k,  it  is  replaced 

by  the  transmitted  information;  the  transmitted  information  is  then 
established  as  record  k  of  the  record  set.  If  k=n,  the  transmitted 
information  is  appended  to  the  record  set  and  the  number  of  records  in 
the  record  set  is  Increased  to  n  +  1  . 

c)  "Insert  as  record  k"  is  a  storage  process  which  causes  information  to  be 
transmitted  to  the  storage  medium.  If  k  =  n,  "Insert  as  record  k"  has 
the  same  meaning  as  "Output  as  record  k".  Otherwise,  the  transmitted 
information  is  established  as  record  k  of  the  record  set.  All  those  records 
of  the  record  set  which  were  referenced  by  j  ^k  prior  to  the  Invocation 

of  "Insert"  are  referenced  by  j  +  1  subsequent  to  the  invocation  of  "Insert". 
"Insert"  causes  the  number  of  records  in  the  record  set  to  be  increased  from 
n  to  n  +  1  . 
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d)  "Delete  record  k"  Is  a  storage  process  which  causes  record  k  of  the 
record  set  to  be  removed  from  the  record  set.  Records  of  the  record 
set  which  were  referenced  by  j  >  k  prior  to  the  invocation  of  "Delete" 
are  referenced  by  j-1  after  Invocation  of  "Delete".  If  n  =  1  ,  "Delete" 
causes  the  record  set  to  be  made  empty. 

e)  "Open  file"  Is  an  Initialization  process  which  causes  the  record  set  and 
the  storage/retrieval  processes  of  the  file  to  be  readied  for  processing.  The 
storage/retrieval  processes  "Input",  "Output",  "Insert",  and  "Delete" 
may  be  invoked  only  after  "Open  file"  has  been  Invoked. 

f)  "Shut  file"  is  a  termination  process  which  causes  the  record  set  and  the 
storage/retrieval  processes  to  be  brought  to  a  state  of  Inactivity.  Once 
"Shut  file"  has  been  invoked,  "Input",  "Output",  "Insert",  or  "Delete" 
may  not  be  invoked  until  "Open  file"  is  invoked  once  again. 

3.2.2.11.2.2  The  Representational  File 

3.2.2.11.2.2.1  The  Representational  Record  Set 

Each  record  in  the  representational  record  set  Is  an  Information  group  the  attributes 
of  which  reflect  properties  peculiar  to  a  particular  storage  medium  and  transmission 
(e.g.,  parity  mode).  Such  Information  group  attributes  may  also  reflect  the  programmer’s 
desire  to  conserve  space  in  the  storage  medium,  as  when  he  blocks  many  functional 
records  together  into  one  representational  record. 

Representational  records  will  have  a  structure  and  Information  type  peculiar  to  the 
associated  storage  medium  and  transmission  device.  A  representational  record  set 
may  contain  greater  or  fewer  records  than  the  number  of  records  In  the  functional 
record  set  being  represented.  A  representational  record  set  has  an  associated  reference 
set  that  is  peculiar  to  the  particular  storage  medium  and  transmission  device  being 
used.  Such  a  reference  set  may  consist  of  disk  or  drum  addresses,  or  it  may  contain 
"position"  numbers  which  specify  where  the  record  is  on  a  tape,  in  a  card  reader,  or 
on  a  printer. 

It  is  important  to  note  that  a  given  functional  record  set  may  have  associated  with 
it  a  wide  variety  of  representational  record  sets  If  the  functional  record  set  is  to 
be  represented  in  a  variety  of  different  storage  media  and  transmitted  by  a  variety  of 
different  transmission  devices. 

3.2.2.11.2.2.2  The  Representational  Storage/Retrieval  Processes 

"Transmission",  as  used  In  this  paragraph  may  Involve  some  alteration  of  Information,  as 
for  example,  conversions  between  internal  and  external  hollerlth  encoding  techniques. 
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The  actual  transmission  associated  with  an  Input  or  Output  typically  requires  Initiation 
of  an  Input  or  Output  Operation  and  processing  of  thejnterrupt  signal  returned  by  the 
transmission  device  when  It  has  completed  the  transmission.  Thus,  representational  storage/ 
retrieval  processes  may  allow  other  forms  of  processing  to  occur  between  transmission 
Initiation  and  completion.  Device  manipulations  of  all  kinds  may  be  required  to  effect 
the  transmission;  these  manipulations  may  Indeed  be  commanded  by  device: procedure: 
executionrstatements,  (JDEV). 

A  representational  record  Is  referenced  by  specifying  Its  associated  reference  set  element. 

This  element  may  be  an  explicit  disk  or  drum  address  or  it  may  appear  Implicitly  In  a 
command,  as  In  "read  the  next  tape  block".  The  following  describes  the  representational 
storage/retrieval  processes. 

a)  To  "Input"  or  "Output"  a  representational  record  will  involve  commanding 
some  transmission  device  to  move  the  representational  record  between 

main  memory  and  a  storage  medium.  Device  commanding  requires,  of  course, 
the  specification  of  a  variety  of  device  specific  parameters.  "Outputing" 
a  record  may  Involve  "Inputing'*  other  records  of  the  record  set,  as  when 
dealing  with  disk  records  which  are  "linked"  by  disk  addresses  embedded 
in  each  record  as  part  of  the  data  of  that  record.  Representational 
"Inputing"  and  "Outputing"  may  also  involve  commanding  devices  to 
perform  non-transmisslon  processes,  e.g.,  backspacing,  rewinding, 
positioning  read/write  heads,  etc. 

b)  "Inserting"  representational  records  may  involve  both  "Inpul  ing"  and 
"Outputing"  as  may  "Deleting"  representational  records. 

c)  "Opening"  a  representational  file  may  Involve  securing  a  device, 
allocating  main  memory  buffer  space,  initiating  the  "Input"  of  a 
physical  record,  and  the  like.  "Shuting"  a  representational  file  may 
involve  releasing  a  device  and  main  memory  buffer  space. 

It  is  clear  that  different  representational  storage/retrieval  processes  will  need  to  be  applied 
against  the  same  functional  record  set  represented  in  different  storage  media  and  transmitted 
by  different  devices.  Also,  It  Is  clear  that  certain  functional  processes  will  be  feasible 
for  one  file  representation  and  not  for  another  so  that  a  functional  file  may  be  limited 
in  the  number  of  representations  that  can  be  defined  for  it.  For  example,  a  file  requiring 
"Output"  to  "rewrite"  a  record  cannot  usually  be  represented  feasibly  where  magnetic 
tape  is  a  storage  medium. 

3.2.2.11.2.3  Functional  and  Representational  Specifications  and  Interfaces  In  JFILE 

JFILE  allows  for  the  manipulation  of  files  In  both  a  functional  and  a  representational  manner. 
Explicit  language  features  are  provided  to  deal  with  files  functionally  (see  3.2.2.11  .2.4, 
below).  The  functional  record  set  and  reference  set  as  well  as  the  functional  storage/retrieval 
processes  of  paragraph  3. 2. 2.1 1 .2.1  are  embodied  in  these  language  features.  The 
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representational  particular  file  aspects  are  dealt  with  in  terms  of  "Service  Routines"  which 
are  tailored  to  the  specific  storage  media  and  transmission  devices  of  a  particular  application. 
Service  Routines  are  either  closes  or  procedures  which  are  written  by  the  programmers  for 
a  specific  application. 

A  Service  Routine  is  associated  with  each  of  the  functional  storage/retrieval  processes 
which  will  be  carried  out  during  the  processing  of  the  file;  the  association  of  Service 
Routine  with  functional  process  is  effected  by  means  of  the  filerdeclaration . 

Service  Routines  handle  all  representational  aspects  of  the  file.  In  general,  embedded 
within  their  structure  will  be  facilities  for  effecting  the  following: 

•  device  assignment 

•  recording  modes  and  densities 

•  record  set  labelling 

•  internal  buffering 

•  initiation  of  device  procedure  executions 

•  interrupt  processing 

•  external  storage  media  allocation  and  management 

•  transmission  error  checking  and  recovery  procedures 

•  sequential  or  random  access 

(Note  that  device  manipulations  might  typically  be  handled  by  de vl ce : procedure : 
executIon:state  ments) 

The  set  of  all  Service  Routines  is  referred  to  as  the  JSERVICE  submodule  of  JIO.  It  is 
anticipated  that  a  given  application  will  fix  on  a  set  of  (application)  standard  Service 
Routines,  or  use  such  Service  Routines  as  are  provided  by  an  operating  system.  A  Service 
Routine  specified  for  a  given  functional  storage/retrieval  process  should  simulate  and 
preserve  all  the  functional  characteristics  of  files  as  described  in  3.2.2.11  .2.1,  though 
there  is  no  way  to  guarantee  that  this  be  so.  (For  example,  the  Service  Routine  associated 
with  "Input  record  k"  should  be  so  written  as  to  make  the  correspondence  between  the 
functional  reference  k  and  any  physical  reference,  and  cause  transmission  of  functional 
record  k  to  occur  as  described  In  3.2. 2.1 1.2.1  .2(a)  regardless  of  any  (representational) 
device  manipulations  or  internal  buffering  techniques  which  may  be  required  to  do  so). 

The  syntactic  entity,  servicercall ,  Is  the  mechanism  provided  for  specifying  the  Invocation 
of  a  Service  Routine  when  performing  a  functional  file  operation.  A  serviceicall  Is  a 
closername  or  a  procedurercall .  A  procedure  real  I  is  the  same  as  a  procedureica  1 1 :  state  me  nt 
except  that  it  does  not  contain  a  terminal  When  a  servIcercaM  Is  said  to  be  "operated" 

in  paragraph  3.2.2. 1 1 .2.4,  the  effect  obtained  is  exactly  that  ol^tal ned  by  either 

GOTO  closetname  $ 


or 


procedurercall  $ 


Note  that  any  actual  ;Input:para  meters  of  the  procedure:  cal  I  are  evaluated  in  the  usual 
way  at  the  time  the  servlce:call  Is  o^rated^  and  not  before.  If  the  operation  of  a 
servicercall  causes  a  close  to  be  invoked  which  was  declared  in  a  FOR  statement  and 
which  references  the  loop:variable  of  the  FOR  statement,  the  effect  of  the^^ ose 
invocation  is  undefined. 


If  the  servicercall  is  a  procedure :cal  I  and  if  one  or  more  of  the  actual rpara meters 
contains  a  looprvariable,  the  filerdeclaration  containing  the  servicercall  must  also 
be  within  the  scope(s)  of  definition  of  the  loop:variable(s) .  Also  any  open:,  input;, 
output;.  Insert:,  delete;,  or  shutistatement  which,  when  executed,  will  cause  such  a 
servicercall  to  be  operated  must  be  within  the  scope(s)  of  definition  of  the  loop;varlable(s); 
otherwise  the  operation  of  the  servicercall  is  undefined. 

3.2.2,11  .2.4  The  File; Declaration  and  File  Statements 

3.2.2.11.2.4.1  The  FilerDeclaration 


A  filerdeclaration  is 

FILE  6  filername  6  filerprocessrl ist  6  $ 

Filername  is  a  Category  3  name  which  serves  to  Identify  the  file, 
is  either 


or 


fl  lerprocess 


filerprocessriist  0  fi lerprocess 


A  filerprocessriist 


A  filerprocess  is 

MODE  0  mode ‘.integer  6 

openrprocessrclause  6 
o  pt  1  ona  I  r  pos ;  procels ;  c  I  a  u se  6 
opt  I ona)  r  I  nput  rprocessrclaTi^se  6 
optional  rout  put  rprocessrclause  0 
optional  rinse rtrprocessrclause  6 
optional rdeleter^Tocessrclause  0 
shut  rprocessrclause  0 


Note  that  at  least  one  of  the  optional  clauses  In  a  filerprocess  must  be  included  In  filerprocess. 
Moderinteger  Is  an  unsigne drinteger  which  servles  to  identify  the  filerprocess  In  which  It  is 
contained;  If  more  than  one  filerprocess  appears  in  the  filerprocessriist,  the  moderinteger 
of  any  one  must  be  different  from  the  moderinteger  of  any  other. 


A  filerprocess  is,  in  effect,  a  specification  for  a  particular  "mode"  of  file  initialization, 
storage/retrieval  and  termination  processes  which  will  be  carried  out  together;  the 
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file;process:list  allows  as  many  such  "modes"  as  desired  to  be  specified  in  the 
file:declaration . 


The  purpose  of  the  clauses  in  fIle:process  is  to  show  a  correspondence  between  the 
functional  file  operators  OPEN,  POS,  INPUT,  OUTPUT,  'INSERT,  'DELETE,  and 
SHUT,  and  the  representational  service:calls  by  which  they  are  realized  as  indicated 
below. 


Open:process:clause 

pos:process:clause 

input:process:clause 

output  :process:clause 

insert:process:clause 

delete:process:clause 

shut:process:clause 


IS 


< 


OPEN  e 
POS  e 
INPUT  e 
OUTPUT  e 
'INSERT  e 
'DELETE  e 
SHUT  e 


service:call 
service:call 
servicercall 
servicercall 
service  :cal  I 
servicetcall 
servicercall 


Servicercalls  are  not  operated  at  the  time  a  filerdeclaratlon  is  made,  but  rather  at  the 
time  g  file  statement  is  executed,  as  described  below .  Note  that  at  execution  time,  PFILE, 
the  file  processing  mechanism,  has  access  to  all  information  declared  by  a  filerdeclaration . 

3.2.2.11.2.4.2  File  Statements 


Statements  performing  file  processing  are: 


openrstatements 

inputrstatements 

outputrstatements 

Insertrstatements 

deleterstatements 

shutrstatements 


Additionally, file  processing  operations  may  take  place  whenever  a  value  is  assigned 
to  the  functional r modifier  POS . 

Open:,  input:,  output:,  insert:,  delete:,  and  shutrstatements  are  the  JOVIAL  features 
provided  for  effecting  the  functional  file  processes  "Open",  "Input",  "Output",  "Insert", 
"Delete",  and  "Shut"  discussed  in  3.2.2.11  .2.1  .2.  References  to  records  in  the  functional 
record  set  are  made  by  assigning  values  to  functional rmodifier  POS  (see  3. 2. 2.1 1  .2.4.3). 
Thus,  the  invocation  of  the  functional  retrieval  process  "Input  as  record  k"  is  carried 
out  by  first  assigning  k  to  POS  and  then  executing  an  inputrstatement.  Note  that: 

•  file  statements  do  not  automatically  change  the  value  of  POS  when  they 
are  executed  (though  the  associated  Service  Routines  may  be  written 
in  such  a  way  to  perform  this  action  if  desired) 
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•  assignment  of  a  value  to  POS  does  not  automatically  cause  positioning 
of  the  storage  medium  with  respect  to  the  transmission  device  (though 
Service  Routines  may  produce  this  result  If  desired). 

A  openistatement  Is 

OPEN  0  flleiname  0  MODE  0  moderformula  0  $ 
where  moderformula  Isa  numericiformula . 

An  Inputistatement  Is 

INPUT  0  fllername  9  iorllst  0  $ 

An  outputrstatement  is 

OUTPUT  0  filername  0  iorllst  0  $ 

An  insertrstatement  Is 

'INSERT  0  filername  0  iorlist  0  $ 

A  deleterstatement  is 

'DELETE  0  filername  0  $ 

A  shutrstatement  is 

SHUT  0  filername  0  $ 

An  iorlist  is 

ioroperand 

or 

iorlist  0,  0  ioroperand 

An  ioroperand  Is  either  a  named rvarlable  or  tablername  or  array: name . 

Note  that  the  phrase  "currently  opened"  will  be  used  subsequently  to  describe  any 
file  whose  filername  appears  in  an  openrstatement  which  has  been  executed  and  where 
no  execution  of  a  shutrstatement  witn  the  same  filername  has  yet  taken  place. 

3.2.2. 1 1  .2.4.3  Functional: Modifier  POS 

POS  is  a  functional  modifier  which  designates  an  unsignedrintegerrvariable  when  applied 
to  a  filername  and  can  therefore  be  assigned  values.  POS  may  appear  in  two  formsr 

POS  0  (0  filername  0) 
or 


POS 
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When  the  second  form  of  POS  is  used,  a  fileiname  is  automatically  supplied.  That 
file;name  is  supplied  which  refers  to  a  currently  opened  file  and  which  appeared  in  the 
last  openistatement/  input;statement,  output rstatement,  Insertrstatement,  or  deleteistatement 
executed  prior  to  the  POS  reference.  POS  is  undefined  if  used  when  no  file  is  currently 
opened  or  when  a  specific  fileiname  (form  1)  used  refers  to  a  file  not  currently  opened. 

The  value  taken  by  POS  is  the  reference  number  of  a  (logical)  functional  record  in  the 
functional  record  set  associated  with  fileiname .  POS  provides  the  mechanism  for 
functional  "Referencing"  as  described  in  3.2.2.11  .2.1  .2.  A  further  description  of  POS 
is  given  in  3. 2. 2. 11. 2. 4. 5. 7  below. 

3.2.2.11.2.4.4  Functional iModifier  'FILENUM 

'FILENUM  is  a  functionalimodifier  which  produces  an  unsignediinteger  when  applied 
to  a  file:name.  'FILENUM  does  not  designate  a  variable  and  cannot  be  assigned  values 
in  any  JOVIAL  J3  program.  'FILENUM  may  appear  in  two  forms: 

'FILENUM  e  (0  fileiname  9) 
or 

'FILENUM 

When  the  second  form  is  used,  a  fileiname  is  automatically  supplied.  That  fileiname 
is  supplied  which  refers  to  a  currently  opened  file  and  which  appeared  in  the  last 
openistatement,  input istatement,  outputistatement,  insert: statement,  or  deleteistatement 
executed  prior  to  tne  *FILENUM  reference .  *FILE NUM  is  undefined  if  used  when  no 
file  is  currently  opened  or  if  a  specific  fileiname  (form  1 )  is  used  which  refers  to  a  file 
not  currently  opened. 

Values  taken  by  'FILENUM  always  lie  in  the  range  0.  .  .m,  where  m  +  1  is  the 
maximum  number  of  files  ever  "currently  opened"  during  the  course  of  program  execution. 
'FILENUM  is  undefined  if  fileiname  refers  to  a  file  not  currently  opened. 

The  purpose  of  'FILENUM  is  to  provide  an  interface  between  file  manipulation  statements 
and  the  Service  Routines  by  which  they  are  realized.  Thus  a  set  of  Service  Routines  might 
be  so  written  as  to  reference  file  parameters  maintained  in  a  table,  with  the  parameter 
sets  for  distinct  files  stored  in  distinct  entries.  Service  Routines,  when  operated,  would 
determine  the  appropriate  set  (entry)  of  file  parameters  to  use  by  means  of  'FILENUM, 
e.g.,  FILE  'PARAM  ($  'FILNU/^. 

3.2.2.11.2.4.5  PFILE  and  File  Statements 

PFILE  supervises  the  execution  of  all  file  statements. 
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3.2.2.11 .2. 4. 5.1 


Execution  of  the  OpenrStatement 


The  following  functions  are  performed  in  the  execution  of  the  openrstatement . 

(a)  PFILE  determines  if  the  file  called  filername  has  already  been  establised 

as  “currently  opened".  If  so,  execution  of  the  openrstatement  is  undefined. 

(b)  PFILE  creates  a  unique  non-negative  integer  and  assigns  it  to  the  *FILENUM 
associated  with  this  file.  As  previously  stated,  the  value  of  'FILENUM  is 
in  the  range  0.  .  .m  where  m  +  1  1$  the  maximum  number  of  files  ever 
"currently  opened"  during  the  course  of  program  execution. 

(c)  The  modeiformula  of  the  openrstatement  is  evaluated  in  the  same  manner 
as  if  it  were  a  subscript. 

(d)  PFILE  determines  if  a  filerprocess  identified  by  the  value  yfelded  by 
evaluation  of  the  moderformula  has  been  included  in  the  filerdeclaration 
for  the  file  called  filername .  If  no  such  filerprocess  was  included  In  the 
declaration,  execution  of  the  openrstatement  is  undefined.  Otherwise, 

PFILE  establishes  the  filerprocess  so  Identified  as  the  "current  filerprocess" 
for  the  file  called  filername. 

(e)  PFILE  establishes  the  status  of  the  file  called  filername  as  "currently  opened". 

(f)  PFILE  operates  the  servicercall  given  In  the  openrprocessrclause  of  the  current 
filerprocess. 

(g)  When  the  servicercall  returns  control  to  PFILE,  PFILE  returns  control  to  the 
first  statement  following  the  openrstatement  . 

3.2.2.11  .2. 4. 5. 2  Execution  of  the  InputrStatement 

The  following  functions  are  performed  in  the  execution  of  the  inputrstatement . 

(a)  PFILE  determines  if  the  status  of  File  called  filername  is  "currently  opened". 

If  not,  execution  of  the  Inputrstatement  is  undefined. 

(b)  PFILE  then  determines  if  an  input rprocessr clause  is  included  in  the  current 
filerprocess  established  for  the  file  c^fled  file rname .  If  not,  execution  of 
the  Inputrstatement  is  undefined. 

(c)  The  lorllst  of  the  Inputrstatement  is  established  as  the  "current  io-.list"  by 
PFILE.  Subscripts  of  namedrsubscriptedr variables  appearing  in  the  iorlist 
are  evaluated  at  this  time,  in  the  same  manner  that  they  would  be  evaluated 
had  the  namedrsubscriptedr  variables  appeared  in  any  other  statement.  Also, 
subscripts  for  namedrsubscriptedrvariables  are  evaluated  in  the  same  left 

to  right  order  that  the  namedrsubscriptrvarlables  appear  in  the  iorlist.  Note 
that  these  remarks  about  subscript  evaluation  apply  whenever  the  phrase 
"established  as  the  current  iorlist "  appears  In  subsequent  paragraphs. 

(d)  PFILE  operates  the  servicercall  associated  with  the  inputrprocessrilst  in  the 
currentrprocessriist . 

(e)  When  the  servicercall  returns  control  to  PFILE,  PFILE  returns  control  to  the 
first  statement  following  the  inputrstatement . 
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3,2.2.11.2.4.5.3 


Execution  of  the  Output;i>tafement 


The  description  of  output ;state me nt  execution  is  identical  to  the  description  of 
input; statement  execution  (3.2.2.11  . 2.4.5. 2)  except  that  every  occurrence  of  the 
word  input  should  be  replaced  by  the  word  output. 

3.2.2. 1 1  .2. 4. 5. 4  Execution  of  the  I nsertiStatement 

The  description  of  lnsert;Statement  execution  is  identical  to  the  description  of 
I nputiStatement  execution  (3.2.2.11  . 2. 4.5 . 2)  except  that  every  occurrence  of  the 
word  input  should  be  replaced  by  the  word  insert. 

3.2.2.11.2.4.5.5  Execution  of  the  Delete:Statement 

The  description  of  deleterstatement  execution  is  identical  to  the  description  of 
inputrstatement  execution  (3. 2 . 2. 1  1 . 2. 4.5. 2)  except  that  subparagraph  (c)  does 
not  appear  (a  deleterstatement  has  no  loillst)  and  every  occurrence  of  the  word  input 
should  be  replaced  by  the  word  delete. 

3.2.2.11  .2. 4. 5. 6  Execution  of  the  ShutiStatement 

The  following  functions  are  performed  in  the  execution  of  the  shutistatement. 

(a)  PFILE  determines  if  the  file  called  fileiname  has  been  established  as 
“currently  opened".  If  not,  execution  of  the  shutrstatement  is  undefined. 

(b)  Then  PFILE  operates  the  serviceicall  given  in  the  shutrprocessiclause  of 
the  current  file;process  for  the  file  file:name. 

(c)  When  the  service  real  I  returns  control  to  PFILE,  PFILE  establishes  the  status 
of  the  file"fn  einame  as  "not  currently  opened"  and  returns  control  to  the 
first  statement  following  the  shut;statement . 

3.2.2.11  .2. 4. 5. 7  Execution  of  Assignment  to  POS 

The  following  functions  are  performed  in  the  execution  of  the  assignment  to  POS. 

(a)  PFILE  determines  if  file  file;name  has  been  established  as  "currently  opened". 
If  not,  any  reference  to  POS  is  undefined  (see  3.2.2.11  .2.4.3). 

(b)  The  value  to  be  assigned  to  POS  for  file  fileiname  is  assigned. 

(c)  If  a  posiprocessiclause  is  present  in  the  current  file: process  for  file  fileiname, 
PFILE  operates  It.  Otherwise  PFILE  returns  control  to  the  first  program  step 
following  the  assignment  to  POS. 

(d)  When  the  service ;cal I  returns  control  to  PFILE,  PFILE  returns  control  to  the 
first  program  step  following  assignment  to  POS. 
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(e)  Note  that  the  reason  for  allowing  a  serviceicall  to  be  operated  when  a 
value  IS  assigned  to  POS  is  to  allow  a  "repositioning"  of  the  transmission 
device  over  the  representational  record  set  well  in  advance  of  the  next 
access  to  a  record.  A  programmer  requiring  random  access  to  a  disk,  say, 
might  do  a  POS  assignment  (with  serviceicall),  then  some  computations, 
and  finally  execute  an  inputistatement,  realizing  that  the  computations 
will  be  carried  on  while  a  disk  read-head  is  "repositioning". 

3.2.2.11.2.5  The  Built-In  Procedures  TBL  and  TLB 

TBL  (Transmit  Buffer  to  iorlist)  and  TLB  (Transmit  Io;IIst  to  Buffer)  allow  the  applications 
programmer  writing  Service  Routines  to  transmit  between  functional  records  (which  have 
been  brought  into  main  memory  from  an  external  storage  medium  or  which  will  be 
transmitted  from  main  memory  to  a  storage  medium)  and  the  internal  data  structures 
which  are  named  in  the  iorlist  of  input:,  output;,  and  Insertrstatements. 

The  following  functions  are  performed  in  the  execution  of  TBL  and  TLB  which 
operate  under  the  control  of  PFILE. 

(a)  TBL  is  invoked  by 

TBL  (BUFFER,  DISPLACEMENT,  LENGTH)  $ 

TLB  is  Invoked  by 

TLB  (BUFFER,  DISPLACEMENT,  LENGTH)  $ 

BUFFER  is  tablername  or  arraying  me  denoting  the  (main  memory)  buffer  area 
which  will  receive  the  functional  record  from  the  iorlist  (TLB)  or  which  contains 
the  functional  record  to  be  transmitted  to  the  iorlist  (TBL). 

DISPLACEMENT  is  an  integerrvariable  which  Is  an  increment  from  the 
first  word  address  of  BUFFER:  TBL,  and  TLB  add  DISPLACEMENT  to  the  first 
word  address  of  BUFFER  to  produce  the  first  word  address  of  the  functional 
record  storage  area. 

LENGTH  Is  an  unsignedrintegerivarlable  representing  the  length  ia  words 
of  the  functionaf  record  storage  area. 

(b)  TBL  causes  the  functional  record  characterized  by  the  I nputrpara meters  to 
be  transmitted  to  the  internal  data  structures  of  the  "current  ioilist" .  the 
"current  iorlist"  Is  established  by  PFILE  as  described  in  3. 2. 2.1 1  .2.4.5. 

TBL  treats  the  functional  record  as  a  bit  string  and  the  elements  of  the 
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"current  iorllst"  as  a  set  of  bit  strings,  one  for  each  named ;variable, 
table,  or  array  making  up  the  "current  lorlist" .  A  bit  string  corresponding 
to  a  namedivarlable  consists  of  all  bits  required  to  represent  the  variable. 
Including  any  filler  bits.  Bit  strings  corresponding  to  tables  and  arrays 
are  composed  of  those  (contiguous)  blocks  of  words  used  to  represent  the 
tables  and  arrays.  In  the  case  of  tables,  the  contiguous  block  contains 
the  NENT  word  as  the  first  word;  even  if  the  table  is  variable,  the 
length  of  the  block  is  based  on  the  total  number  of  words  required  to 
represent  the  table,  regardless  of  the  current  value  of  the  NENT.  The 
transmission  behaves  as  if  the  "current  iorllst"  bit  strings  formed  one 
contiguous  bit  string,  concentrated  together  in  the  same  order  that  the 
namedrvariables,  tables,  and  arrays  appear  in  the  "current  iorllst" . 

Each  functional  record  tit,  starting  with  the  left  most  record  bit,  is  moved 
one  at  a  time  to  a  corresponding  bit  in  the  (contiguous)  "current  lorlist" 
bit  string,  starting  with  the  left  most  current  iorlist  bit.  The  move 
terminates  when  the  functional  record  bit  string  is  exhausted  or  when  the 
"current  lorlist"  bit  string  is  exhausted,  whichever  happens  first. 

(The  description  of  the  transmission  as  a  bit  by  bit  move  is  given  only 
to  indicate  the  functional  characteristics  of  the  move.  An  implementation 
scheme  which  achieves  the  same  functional  end  is  permissible. 

(c)  TLB  causes  the  "current  lorlist"  structures  to  be  moved  to  a  functional 
record  storage  area  whose  first  word  address  and  size  are  characterized 
by  the  TLB  Input  parameters.  The  effect  of  the  transmission  is  Identical 
to  the  TBL  transmission  except,  of  course,  that  the  move  is  from  the 
(contiguous)  "current  iorlist"  to  the  functional  record  storage  area. 

(d)  It  should  be  noted  that  the  iorlist,  however  complex,  is  treated  as  one 
functional  record. 

3.2.2.11.3  JFORMAT 

The  JFORMAT  submodule  is  composed  of: 

•  the  formatrvarlable 

•  the  encode rstate me nt  and  the  decode rstate me nt 

•  the  format  processor,  PFORM 

The  purpose  of  the  JFORMAT  features  is  to  provide  the  facilities  for  converting  data 
in  hollerith  character  string  representations  to  internal  representations  and  vice-versa. 

A  decoderstatement  is  used  to  convert  data  represented  as  hollerith  character  strings 
to  their  corresponding  internal  representation.  An  encode:statement  is  used  to  convert 
data  from  their  internal  representations  to  hollerith  character  string  representations.  The 
purpose  of  the  formatrvarlable  is  to  supply  the  necessary  conversion  and  editing  specifications. 
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Encode:  and  de  c  ode:  state  me  nts  are  thought  of  as  executed  under  the  supervision  of 
the  processor  PFORM. 

3.2.2.11  .3.2.1  The  Format: Variable 


A  format:variable  Is  either  a  hollerith:constant  or  a  named:hol lerith;variable . 


PFORM  interprets  format:variables  to  determine  what  conversions  and  editings  are 
to  take  place.  The  hollerith  characters  making  up  the  content  of  a  format:variable 
need  have  no  [Xi rt i c u Ta r^tnJc tu re  until  PFORM  is  called  upon  to  interpret  the  format: 
variable  during  the  execution  of  an  encode:statement  or  a  decoderstatement.  Note 
that  all  or  part  of  any  format:variable  may  be  modified  at  execution  time  by  any  of 
the  character  manipulation  features  of  the  language;  this  allows  for  varying  conversion 
and  editing  specifications  at  execution  time. 

When  a  format:variable  is  being  Interpreted,  the  hollerith  characters  comprising  it 
must  take  the  form  of  a  specification'ilst.  (Note:  Prime,  and  not  colon,  will  be  used 
in  the  syntactic  specifications  of  the  content  of  a  format:varIable  to  draw  attention  to 
the  fact  that  such  specifications  apply  at  execution  time  and  not  at  compile  time.  Prime 
plays  the  same  role  played  by  colon  in  the  compile  time  metalanguage  specifications;  all 
other  compile  time  metasyntactic  symbols  have  the  same  meaning  when  used  in  execution 
time  metasyntactic  symbols.) 

A  specification'ilst  is  a 

conversion 'or 'editing 'specifier 

or  a 

specification'  list  0,  0  conversion' or 'editing 'specifier . 

A  conversion'or'editingrspecifler  is  a 

conversion 'specifier 
or 

editing'specifier  or  Iterator  0  (0  specification'ilst  0). 


Iterator  is  a  number. 


A  conversion'specifier  is  one  of  the  forms 

^  0  I  0 
^  0  A  0 
^  0  F  e  ^ 

^  0  D  0 
^  0  S 
W  0  B 
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^0  O 
^0  X 
^0  H 
^0  H  0  L 

A  fixedifieldtiist  is  either 

fixed:field:element 

or 

fixed:field:list  0,  0  fixed:field:element. 

A  free:field:list  is  either 

free:field:element 

or 

free:field:list  0,  0  free:field:element 

A  fixed:field:element  is  a  named;variable .  A  freerfieldtelement  is  either  a 
named rvariable,  tablername,  or  array:nome .  Note  that  on  array:name  may  be  used 
in  fixed:field:Iist  as  I  ong  as  It  Is  appropriately  subscripted  and  that  a  tablername 
may  not  appear  at  all  In  a  fixedrfleldrilst . 

Conversions  are  termed  "free  field"  If  they  are  specified  by  an  encode:  or  decode: 
statement  with  a  free;fIeld:conversIon:clause;  otherwise  they  are  termed  "fixed  field". 

3. 2.2.1 1  .3.3  Fixed  Field  Conversions 

"Field"  means  a  substring  of  the  buffer  associated  with  an  encode:  or  decode :statement. 

Buffer:name  Is  either  the  name  of  a  llteral:ltem^  a  table  or  array.  If  buffer:name  Is  the 
name  of  a  literal  :Item,  that  Item  must  be  not  less  than  4^  bytes  In  length  and  must  begin 
I n  byte  0  of  a  word.  Further,  If  the  structure  called  buffenname  Is  greater  than  one  word 
In  length.  It  must  occupy  consecutive  words.  When  the  structure  called  buffer:name  Is 
used  In  an  encode:  or  decode :state me nt ,  It  Is  treated  as  a  string  of  hollerith  characters, 
no  matter  how  It  may  have  been  declared.  (The  structure  called  buffer :na me  Is  referred 
to  subsequently  as  the  buffer.) 

A  conversIon:clause  Is  either  a  fIxed;fIeld:conversIon:clause  ora  free:field:conversIon: 
clause. 

A  fIxed:fIeld:conversIon:clause  Is  either 

(9  forma t:vari able  0)  9  flxed:fleld:llst 
or 

(0  format:varIable  9,  9  service ;call  9)  9  flxed:fleld:llst 
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A  free:field:conversion:clause  Is  either 


(0)  0  free :fie Id: list 
or 

(0  ,  0  servicercall  0)  free:field:list 
An  editing'specifier  Is  one  of  the  forms 

'IL 

-  0  ^ 

W  0  C 

Kollerithrconstont 


W  denotes  a  number,  the  value  of  which  must  be  non-zero;  d  denotes  a  number.  The 
meaning  of  conversion'specifiers  and  editing 'specifiers,  ancTthe  role  played  by  iterator 
will  be  explained  in  3.2.2. 1 1 .3.3,  3. 2. 2. 11. 3. 4,  and  3. 2. 2. 11. 3. 5. 

3.2.2.11.3.2  The  EncoderStatement  and  DecoderStatement 

An  encode: statement  is 

'ENCODE  0  buffer:name  0  conversion:clause  0  $ 

A  decode:statement  is 

'DECODE  0  buffer:name  0  conversion:clause  0  $ 

3.2.2.11.3.3.1  Description  of  Conversion'specifiers 

The  number  denoted  by  W  always  represents  the  field  width  in  terms  of  number  of 
character  positions.  The  number  denoted  by  d  represents  an  implied  negative  power 
of  ten  when  used  in  conjunction  with  a  de code : sta te me nt;  when  used  in  conjunction 
with  an  encode:statement,  d  denotes  the  number  of  digits  to  the  right  of  the  decimal 
point.  The  letter  following  W  in  a  conversion 'specifier  indicates  the  "conversion  type". 

L  used  in  W  0  H  0  L,  means  "left-justified".  If  W  0  H  is  used,  "right-justified"  is 
implied.  "Left-justified"  and  "right-justified"  are  defined  in  3. 2. 2. 1  1  .3.3.2  and 
3.2.2.11.3.3.3. 

3.2.2.11.3.3.2  Conversion  with  a  Decode: Statement 

The  execution  of  a  decode: statement  causes  a  field  of  the  buffer  to  be  converted 

from  a  hollerith  representation  to  an  internal  representation  which  is  then  assigned 

to  an  associated  named:variable .  The  form  of  the  internal  representation  is  defined  by 

the  item:declaration  given  for  that  named:variable  which  is  associated  with  the  conversion' 

specifier  during  the  execution  of  the  decode  :state  me  nt. 
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The  conversion  of  a  Hollerith  representation  to  on  interrxal  representation  takes  place 
according  to  the  sanie  rules  and  is  subject  to  the  same  restrictions  as  would  apply  if 
the  conversion  were  effected  by  an  assignment ;statement  of  the  form: 

namedtvariable  0  =  6  constant  0  $ 

where  constant  is  simply  the  contents  of  the  field  being  converted.  However,  it 
must  be  added  that  if  the  contents  of  the  field  form  an  integericonstant  and  the 
conversion  type  is  A,  F,  or  D,  then  the  converted  value  ootained  above  is  multiplied 
by  1  0-d  before  assignment  to  the  rwmedrvariable .  Note  that,  with  the  exception  of 
fields  defined  by  conversion'specifier  W  0  H,  leading  spaces  and  trailing  spaces  in 
the  field  are  not  regarded  as  part  of  the  datum.  The  character  configurations  which 
the  field  may  take  for  any  given  conversion  type  are  shown  in  paragraphs  (a)  -  (f).  The 
conversion  is  undefined  if  the  character  configuration  of  the  field  is  not  one  of  those 
specified  as  allowable  in  (a)  -  (f). 

(a)  Conversion  Type  I,  A,  F,  or  D 

If  the  conversion  type  is  I,  A,  F,  or  D,  the  allowable  character  configurations 
of  the  field  being  converted  are: 

optional  ly:signed:integer:constant 

optional  ly;signed;fixed:consta  nt 

optional  ly:signedtfloating:constant 

optional  ly:signed:extended;precision:floating:constant 

spaces  (all  characters) 

hexadecimal  :constant 
octal  :constant 


If  the  character  configuration  is  spaces,  the  field  is  treated  as  if  the  single 
digit  0  appeared. 

(b)  Conversion  Type  S 

The  allowable  character  configurations  are: 
status:constant 


name 

When  name  is  used,  the  field  is  treated  as  if  its  character  configuration 
were  V(name). 
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(c)  Conversion  Type  B 


The  allowable  character  configurations  are: 

0 

1 

T 

F 

T  and  F  are  treated  as  if  they  were  1  and  0,  respectively, 
(d)  Conversion  Type  O 


The  allowable  character  configurations  are: 

octal  :consta nt 
octahdigits 

When  octal -.digits  are  used,  the  field  is  treated  as  if  its  contents  were  O  (octal 
digits). 

(e^  Conversion  Type  X 

The  allowable  character  configurations  are: 

hexadecima  I :  constant 
hexadecimal :  digits 

If  the  latter  is  used,  the  field  is  treated  as  if  X  (hexadecimal  :digits)  appeared. 

(f)  Conversion  Type  H 

The  allowable  character  configuration  is  any  string  of  hollerlth  characters.  If 
the  string  of  hollerith  characters,  once  stripped  of  any  leading  and  trailing  spaces, 
forms  a  hoi  lerithrconstant,  the  contents  of  the  field  are  treated  as  if  they  were 
that  hollerithrconstant.  Otherwise, 

•  If  the  field  is  defined  as  right-justified  (W  0  H),  any  trailing 
spaces  are  recognized  as  part  of  the  datum. 

•  I f  the  field  is  defined  as  left-justified  (W  0  H  0  L),  trailing  spaces 
are  not  recognized  as  part  of  the  data . 

•  The  contents  of  the  field  are  treated  as  if  they  were  number  H 
(string:of:hol  lerith  icharacters)  where  the  value  of  number  is  the 
number  of  characters  in  the  string  of  hollerith  characters. 


3.2.2.11 .3,3.3 


Conversion  with  an  encode;statement 


The  execution  of  an  encodeistatement  causes  named:variables  to  be  converted  from  their 
internal  representations  to  hollerith  character  string  representations  which  are  inserted  into 
the  buffer.  The  internal  representations  are  defined  by  the  item:declarations  given  for  the 
named:variables .  The  hollerith  character  string  representations  are  defined  by  the  parameters 
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of  the  conversion'specifiers  os  associated  with  the  named; variables  during  the  execution 
of  the  encode;  statement.  The  number  W  of  the  conversion 'specifier  indicates  the  width 
of  the  field  into  which  the  hollerith  character  string  produced  by  the  conversion  will  be 
placed.  The  number  d  indicates  the  number  of  digits  to  the  right  of  the  decimal  point 
in  the  generated  character  string.  The  conversion  type  describes  the  format  of  the 
generated  character  string.  Associated  with  a  given  conversion  type  are  a  set  of 
allowable  item  types.  A  named -.variable  being  converted  with  respect  too  given 
conversion  type  must  admit  to  one  of  the  allowable  item  types;  if  not,  the  effect  of  the 
conversion  is  undefined.  Allowable  item  types  and  hollerith  character  string  representation 
formats  are  described  in  paragraphs  (a)  -  (h)  below. 

(a)  Conversion  Type  I 

Allowable  item  types  of  named;variables  which  may  be  converted  with 
conversion  type  I  are; 

integer 

fixed 

floating 

extended;precision;f  I  gating 

The  format  of  the  hollerith  character  string  generated  by  means  of  this  conversion 
is; 

S  I.  .  .1 

where  S  specifies  sign  and  I .  .  .1  specifies  integer  digits.  If  the  item  converted 
is  signed  and  non-negative,  or  unsigned,  S  is  a  space;  otherwise  S  is  . 

(b)  Converson  Type  A 

Allowable  item  types  which  may  be  converted  are; 

integer  ' 

fixed 

floating 

extended;precision:f  I  gating 
The  format  of  the  hollerith  character  string  is 
SI...I.F.  ..F 

S  and  I.  .  .1  are  as  described  above;  F.  .  .F  are  the  fractional  digits.  The 
number  of  fractional  digits  is  equal  to  d. 

(c)  Conversion  Type  F 

Allowable  item  types  are: 

integer 

fixed 

floating 

extended:precision;floating 
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The  format  Is 

S  •  F.  .  .F  E  ±e.  .  .e 

S  and  F.  .  .F  are  as  described  above.  E  -  e.  .  .e  represents  the  exponent. 

The  number  of  digits  making  up  e .  .  .e  is  implementation  dependent. 

(d)  Conversion  Type  D 

Allowable  item  types  are: 

integer 

fixed 

floating 

extended:precision:floating 
The  format  is 

S  •  F.  .  .F  E  ±e.  .  .e  D 

S,  F.  .  .F  and  e.  .  .e  are  as  described  above.  The  terminal  letter  D  denotes 
extended:precision:floating . 

(e)  Conversion  Types  O  and  X 

Any  of  the  Item  types  that  are  allowed.  The  format  produced  by  type  O  is  O.  .  .O, 
where  O  is  an  octahdigit.  The  format  produced  by  type  X  is  X.  .  .X,  where 
X  is  a  hexadecimal  -.digit . 

(f)  Conversion  Type  S 

The  only  allowable  item  type  is  status.  The  format  is  status:constant:signs  where 
status:constant:signs  are  those  signs  which  appeared  in  any  of  the  constants  V 
(status:constant:signs)  when  the  status:  I  tern  was  declared. 

(g)  Conversion  Type  B 

The  only  allowable  item  type  is  boolean.  The  format  is  "T"  or  "F"  according 
as  the  value  of  the  boolean  item  is  "true"  or  "false". 

(h)  Conversion  Type  H 

The  only  allowable  Item  types  are  literal .  The  format  is  C .  .  .C  where  C 
denotes  a  hollerith  character;  the  number  of  characters  making  up  C.  .  .C 
equals  the  length  of  the  literal  item  converted. 

3. 2. 2.1  1 .3.4  Description  of  Editing ‘specifiers 

An  editing'specifier  does  not  control  conversion,  but  rather  serves  to  describe  to  the 
format  processor,  PFORM,  certain  actions  to  take  when  processing  the  buffer  when 
it  is  used  with  either  an  encode:statement  or  a  decode:statement . 


(a)  The  form  W  means  "skip  forward  in  the  buffer  over  the  next  W  character 
positions". 
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(b)  The  form  -  6W  means  "skip  backward  in  the  buffer  over  the  next  W 

character  positions.  If  W  is  large  enough  to  cause  repositioning  to  the 
left  of  byte  0  of  the  buffer,  the  meaning  is  "skip  back  to  byte  0  of  the 
buffer". 

When  editing'specifier,  hollerith;constant  is  used  with  an  encode  •■statement,  the 
meaning  is  "insert  the  character  string  contents  of  the  constant  into  the  buffer".  When 
used  with  a  decoderstatement,  the  meaning  is  "skip  forward  in  the  buffer  a  number  of 
character  positions  equal  to  the  length  of  the  constant" .  When  the  editing'specifier 
W  6  C  is  used  with  an  encode: statement,  the  meaning  is  "insert  W  spaces  into  the  buffer"; 
^en  used  with  a  decoderstatement,  the  meaning  is  "skip  forward  in  the  buffer  W  character 
positions" . 

3.2.2.11  .3.5  Description  of  Iterator 

When  iterator  is  used  in  the  conversion'or'editi ng'specifier  form 
iterator  6  (6  specification'Iist  6) 

it  has  the  effect  of  replicating  the  contents  of  the  parenthesized  specification'Iist 

that  number  of  times  specified  by  the  value  of  iterator.  Thus  30(5A2,  3,  41)  will  produce 

the  same  result  when  processed  by  PFORM  as  5A2,  3,  41 ,  5A2,  3,  41 ,  5A2,  3,  41 . 

3.2.2.11.3.6  Execution  of  Encode:  and  IDecodeiStotements 

The  execution  of  encode:  and  decode rstatements  with  either  fixedrfield;  or  freerfield: 
conversionrclauses  takes  place  under  the  supervision  of  the  format  processor  PFORM. 

3.2.2.11.3.6.1  Fixed:field  Execution 

This  paragraph  describes  the  execution  of  encode:  and  de code : sta te me nts  with  fixed;field; 
conversion:c louses.  The  action  of  PFORM  causes  three  "pointers"  to  be  manipulated. 

The  buffer  pointer  points  to  a  character  position  in  the  buffer.  The  format  pointer  points 
to  a  conversion'or'editi  ng'specifier  in  the  format:variable .  The  list  pointer  points  to  a 
fixed:field:list:element  in  the  fix^:field:list.  The  buffer  is  said  to  be  exhausted  if  the 
buffer  points  to  the  right  of  the  rightmost  buffer  character  position.  The  fixed:field;list 
is  said  to  be  exhausted  if  the  list  pointer  points  to  the  right  of  the  rightmost  fixedrfield: 
list:element.  The  format:variable  is  said  to  be  exhausted  if  the  format  pointer  points  to 
the  right  of  the  rightmost  converilon'or'edi  ting 'specifier.  Note  that  in  the  following 
description,  it  is  assumed  that  the  format;variable  data  has  the  form  specified  by 
specification'Iist;  if  not,  the  resultant  action  is  undefined.  The  sequence  of  events, 
which  take  place  when  an  encode:  or  decode:statement  with  a  fixed:field:conversion:clause 
is  executed,  is  as  follows: 
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(a)  PFORM  sets  the  buffer  pointer  to  point  to  byte  0  of  the  buffer,  the  format 
pointer  to  point  to  the  leftmost  conversion 'or'edltlng  specifier  In  the  format' 
variable,  and  the  list  pointer  to  point  to  the  leftmost  flxed:field:llst:  element 
of  the  flxed;fleld:llst . 

(b)  If  the  conversion 'or 'editing 'specifier  specified  by  the  format  pointer  Is  an 
edltln^speclfler,  the  action  called  out  by  It  Is  performed  (resetting  the 
buffer  point  byThe  value  W)  and  control  is  passed  to  step  (e).  Otherwise, 
control  is  passed  to  step  (c) . 

(c)  If  the  conversion*or'editing*specifier  is  an  iterated  sub-expression  (form: 
iterator  9  (9  specificationMist  6)  ),  it  Is,  in  effect,  replaced  by  Its  expansion 
as  described  in  3. 2.2.1 1  ,3.5,  and  control  Is  passed  to  step  (b).  (No  pointer 
Is  altered)  Otherwise  control  is  passed  to  step  (d). 

(d)  The  conversion 'preediting  ^specifier  is  a  conversion' specifier.  Any  subscript 
associated  with  the  fixedifieldillshelem^t  specified  by  the^ list  pointer 

Is  evaluated  and  the  conversion  specified  by  the  conversion 'specifier 
is  performed  using  that  fixed:field:llst:element .  lliis^causes  the  buffer 
pointer  to  be  modified  by  the  amount  W.  Then,  both  the  list  and  format 
pointers  are  advanced  one  position  to"the  "right"  and  control  Is  passed 
to  step  (e) , 

(e)  If  the  format rvarlable  is  exhausted,  PFORM  returns  control  to  the  statement 
following  the  encode:  or  decoderstatement .  The  same  action  is  taken  if 
the  flxed:field:list  is  exhausted.  If  the  buffer,  flxed:field:list,  and  format: 
variable  are  not  exhausted,  control  is  passed  to  step  (b) .  jf The  fixed:field:l  ist 
and  the  formatrvarlable  are  not  exhausted,  control  is  passed  to  step  (f). 

(f)  If  a  servicercall  has  been  supplied  in  the  fixed:field:conversion:clause.  It  is 
operated.  OnTcompletion  of  the  servicetcall  execution,  PFORM  sets  the 
buffer  pointer  to  point  to  byte  0  of  the  buffer  and  passes  control  to  step  (b). 

It  should  be  noted  that  the  primary  purposes  of  the  servlceicall  are  to  allow  the  programmer 
the  facility  for  refilling  the  buffer  (decoderstatement)  as  when  converting  card  reader  records, 
or  to  output  the  buffer,  as  to  a  line  printer  (encode rstatement) . 

3. 2.2.1 1  ,3,6.2  Freerfield  Execution 

This  paragraph  describes  the  execution  of  encode:  and  decode: statements  with 
freerfieldrconversionrclauses. 

3.2.2.11.3.6.2.1  Freerfield  Decoderstatement  Execution 

The  actions  taken  by  PFORM  In  the  execution  of  the  decoderstatement  in  the  order 
shown  are: 

(a)  A  "virtual"  fixedrfleldriist  is  constructed  by  PFORM  from  the  freerfieldriist . 

This  construction  takes  pface  by  moving  left  to  right  through  the  freerfieldriist 
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copying  the  nomecltvariables  where  they  are  found  and  replacing  each 
table;name  and  arraytname  with  a  list  of  subscripted  item; names.  In  the 
case  of  a  tablername/  the  item  list  is  composed  of  sublists  the  number  of 
which  is  governed  by  the  current  value  of  the  table  NENT.  Each  sublist 
is  composed  of  the  table;item;names/  subscripted  by  a  constant,  in  the  same 
order  that  they  appeared  between  the  BEGIN  and  END  in  the  table:declaration. 

The  subscripts  of  the  table;item;names  in  a  given  sublist  are  the  same  value; 
subscripts  for  the  table:item;names  in  different  item  sublists  increase  from 
0  to  NENT  (table:name)  -  1  as  the  sublists  appear  from  left  to  right.  (Each 
sublist  corresponds  to  a  table  entry)  Note  that  all  item;names  between  the 
BEGIN  and  END  brackets  of  the  table;declaration  will  appear  in  the  sublist 
for  each  entry,  regardless  of  any  overlaying  which  may  have  been  specified. 

In  the  case  of  arrays,  a  list  of  subscripted  arraying mes  replaces  the 
arraying  me;  that  list  contains  the  same  number  of  subscripted  arraying  mes 
as  there  are  elements  in  the  array.  Subscripts  of  the  arraying  mes  vary 
in  such  a  way  that  the  named; subscripted^! nay  elements  appear  in  the  same 
left  to  right  order  that  would  occur  if  the  constants  of  an  arrayideclaration 
for  the  particular  array  were  replaced  by  their  correspondent  subscripted 
array  inames. 

(b)  A  virtual  formativariable  is  constructed.  This  formativariable  contains 
only  conversion 'specifiers;  the  number  of  conversion'specifiers  equal  the 
number  of  namedivariabl^  in  the  virtual  fixedifieldilist  constructed  in  (a). 

The  conversion  type  is  generated  on  the  basis  of  the  item; descriptions  of 
the  namedivariables.  The  parameter  d  is  established  as  zero;  hollerith 
conversion'specifiers  are  established  as  right-justified. 

(c)  Now,  in  effect,  PFORM  substitutes  the  virtual  formativariable  into  the 
freeifieldiconversioniclause  of  the  decodeistatement  and  replaces  the 
freeifieldilist  with  the  virtual  fixedifieldilist  in  such  a  manner  as  to 
transform  the  freeifieldiconversioniclause  into  a  fixedifieldiconversioniclause . 
Then,  PFORM  executes  the  transformed  decodeistatement  exactly  as  it  executes 
any  decodeistatement  with  a  fixedifieldiconversioniclause,  except  that  the 
field  width  W  is  determined  dynamically  as  PFORM  sweeps  the  buffer  from 

left  to  right.  Each  string  of  consecutive  non-blank  characters  encountered 
in  the  buffer  is  taken  as  a  field  of  length  (W)  which  is  the  number  of  ^oon-blank) 
characters  in  the  string. 

3.2.2.11.3.6.2.2  Freeifield  Encodeistatement  Execution 

The  actions  taken  by  PFORM  in  the  execution  of  the  encodeistatement  in  the  order 
shown  are; 

(a)  A  virtual  fixedifieldilist  is  constructed  in  exactly  the  same  manner  as 
described  in  3. 2. 2. 11. 3. 6. 2.1  (a). 
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( b)  A  virtual  formotrvorioble  is  constructed  on  the  basis  of  the  item: 
declorotions  of  the  nomedrvariobles  in  the  virtuol  fixed ifieldThst, 

The  formottvariable  contoins  o  number  of  conversion  'specifiers 
equol  to  the  number  of  nomed:voriobles  in  the  virtual  fixed:field:list. 
For  o  given  conversion  type,  the  field  wi  dth  W  (and  tTie 
poromater  d)  are  fixed  but  implementation  dependent.  In  oddition 
to  conversion  'specifiers,  editing  'specifiers  are  inserted  into  the 
virtuol  formotivori able. 


These  editing'specifiers  are  selected  in  such  a  way  as  to  guorantee 
that: 

•  for  named:variables  in  the  free:field:list,  the  decode: 
statement  will  produce  the  voriablemame  followed 

by  an  equol  :sign  followed  by  the^olUe 

•  for  toble:nomes  appeoring  in  the  free:field:list,  the 
decode:statement  will  produce,  each  in  a  different 
buffer  image, 

the  table:name 

the  names  of  each  table:item,  as  if  in  a 
column  header 

the  value  of  each  item  for  o  given  entry 
with  the  entry  number 

•  for  arroy:nomes  oppearing  in  the  free:field:list,  the 
decode:statement  wil  I  produce,  eoch  in  o  different 
raiT  imoge, 

the  array:name,  plane  number,  ond  column 
count  for  each  column  in  the  plane 
eoch  row  in  the  plane 
(Plones  ore  repeoted  os  often  os  required.) 

(c)  PFORM  now  substitutes  the  virtuol  formot:voriable  into  the 

free:field:conversion:clause  of  the  encode:statement  ond  reploces 
the  free:field:list  with  the  virtuol  fixed:field:l ist  in  such  o  monner 
os  to  trarTsform  The  free:field:conversion:clouse  into  a  fixed: 
f ie Id :conversion:c louse.  Then  PFORA/T executes  the  encode: 
stotement  exoctly  os  it  executes  any  encode:stotement  wTth^ 
f  ixed  :f  ie  Id  :con  vers  ion  :c  louse. 


3.2.2.11.4  Example 

The  example  in  this  section  illustrotes  the  vorious  focilities  provided  by  JIO  ond 
o  hypotheticol  set  of  standordized  opplicotion  Specific  Service  Routines. 
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These  Service  Routines  consist  of  a  fomily  of  lOCS  (Input/Output  Control  System) 
procedures  ond  o  family  of  I  CBS  (Input/Output  Buffering  System)  procedures. 

The  IOCS  routines  appeor  os  service :cal Is  in  the  flerdeclarations.  They  cause 
information  to  be  moved  between  Tntern^l  buffers  and  the  iorlists  in  file  manipulation 
stotements.  The  IOCS  family  calls  upon  the  lOBS  fomily  to  transmit  information 
between  the  buffers  and  topes  or  disks  by  use  of  tope  drives  and  disk  drives.  The 
following  facts  serve  to  clarify  the  example: 


•  There  are  15  transmission  devices  in  the  hypothetical  system. 

These  are  devices  1  through  15.  Device  0  is  the  central 
processor  itself.  Devices  1  -  7  are  tape  drives.  Devices 
8-15  are  disk  drives. 

•  There  are  two  files  which  are  available  to  the  programmer. 

These  are  SYSINP,  the  system  input  file,  ond  SYSOUT, 

the  system  output  file.  SYSINP  and  SYSOUT  are,  respectively, 
permanently  assigned  to  tapes  1  and  2. 

•  IOCS  ond  lOBS  make  reference  to  five  (global)  tobies. 

FPT  (File  Parameter  Table)  contains  file  parameters.  FPTW 
is  a  like  table  with  the  same  structure  as  FPT.  FPTW  is  a 
"working”  file  parameter  table.  DFT  is  a  device/file  table. 

There  is  one  entry  for  each  device.  In  o  given  entry,  the 
item  DFA  is  "true"  if  the  device  whose  number  is  the  ordinal 
of  the  entry  is  assigned  to  o  currently  opened  file.  If  DFA 
is  true,  DF  contains  the  value  of  the  'FILENUM  which  was 
generated  by  PFILE  for  that  file.  File  buffers  are  always 
maintained  in  a  special  (global)  table  called  SYSBUF'TABLE. 

•  A  buffer  for  a  file  is  allocated  in  SYSBUF'TABLE  by  means 
of  a  system  function  called  RESERVE'SYSBUF;  the  example 
assumes  that  SYSBUF'TABLE  never  runs  out  of  space.  (Note 
that  the  full  computer  word  of  this  system  takes  32  bits  —  each 
SYSBUF'TABLE  entry  is  one  32  bit  word  in  length.)  The 
table  BFT  (Buffer/File  Table)  relates  the  index  of  the  first 
SYSBUF  word  of  a  file  buffer  to  the  'FILENUM  of  the  file; 
the  ordinal  of  a  BFT  entry  is,  in  fact,  the  'FILENUM  value. 

The  I  CCS  and  lOBS  Service  Routines  shown  odhere  to  the  following  conventions: 


•  Both  functional  and  representotional  records  are  fixed  length. 
A  representationol  record  may  be  o  block  of  one  or  more 
functional  records,  but  the  block  must  always  contain  the 
same  number  of  functional  records. 

•  A  buffer  for  a  file  consists  of  the  number  of  words  in  a 
representational  record  plus  one  word. 

•  The  first  word  of  the  buffer  is  a  buffer  control  word;  its  value 
is  always  the  device  status  as  determined  by  the  device 
procedure  STAT'CHECK. 
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•  No  multiple  buffering  is  permitted;  only  one  representational 
record  at  a  time  may  be  maintained  in  a  file  buffer. 

•  One  and  only  one  device  is  ever  associated  with  a  file. 

Only  15  files  may  ever  be  currently  opened  simultaneously. 

•  Reading  always  begins  at  the  first  record  in  the  functional 
record  set  and  proceeds  from  record  to  record  in  the  order 
of  increasing  reference  number;  no  backspacing  is  allowed. 

POS  is  always  assigned  values  from  within  the  IOCS  routines. 

Note  that,  for  the  purposes  of  simplicity,  many  important  details  have  not  been 
included  in  the  example.  It  is  for  simplicity's  sake  also  that  the  conventions 
above  are  used.  Thus,  this  example  is  purposefully  simplified  and  is  not  to  be 
construed  as  a  full-scale  model  for  a  set  of  Service  Routines  and  is  included  on  the 
following  pages. 
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EXAMPLE 


START  $ 

"FILE  PARAMETER  TABLE" 

TABLE  FPT  V  100  S  $ 

BEGIN 

ITEM  FILE  NAME  H  24  $  "NAME  OF  FILE" 

BEGIN  H(SYSINP)  H(SYSOUT)  END 
ITEM  FUNC'REC  LENGTH  115  U  $ 

"NUMBER  WORDS  PER  FUNC  RECORD" 

BEGIN  20  30  END 

"20  WORDS  =  80  CARD  COLUMNS, 

30  WORDS  =  120  CHARACTER  PRINT  LINE" 

ITEM  FUNCS'PER'REP  I  15  U  $ 

"NUMBER  OF  FUNC  RECORDS  IN 
REPRESENTATIONAL  RECORD" 

BEGIN  1  1  END 

"SYSINP,SYSOUT  ARE  UNBLOCKED" 

ITEM  BASE/NUM  I  32  U  $ 

"IF  STORAGE  IS  DISK,  BASE'NUM  =  DISK 
ADDRESS  OF  ZERO-TH  REP  RECORD. 

IF  STORAGE  IS  TAPE,  BASE'NUM  =  FILE  NUM  ON  TAPE" 

BEGIN  0  0  END 

"SYS  IN  P/OUT  ARE  TAPE,  EACH  FILE  NUMBER  0  ON  THE  REEL" 
ITEM  DEVICE  I  15  U  $ 

"NUMBER  OF  DEVICE  ATTACHED" 

BEGIN  1  2  END 
END  "FPT" 

"NOTE  THAT  THE  PRESETS  IN  FPT  ARE  FOR  SYSINP  AND  SYSOUT" 
ITEM  NENT'FPT  I  32  S  P  2  $ 

OVERLAY  NENT' FPT  =  FPT  $ 

"ESTABLISH  NENT  (FPT)  AS  2  TO  ACCOUNT  FOR  PREDEFINED  SYSINP, 
SYSOUT  ENTRIES" 

"NOW  DEFINE  A  'LIKE'  WORKING  FPT" 

TABLE  FPTW  R  I  6  S  L  $ 

"DEVICE/FILE  TABLE  =ONE  ENTRY  PER  DEVICE" 

TABLE  DFT  R  I  6  S  $ 

BEGIN 

ITEM  DF  I  32  S  $ 

"DF  ($  DEVICE  NUMBER  $)  =  FI LENUM  OF  ASSOCIATED  FILE" 
ITEM  DFA  B  $  "DFA  ($  DEVICE  NUMBER  $) 

=  TRUE  IF  DEVICE  IS  ASSIGNED  TO  A  FILE,  OTHERWISE  FALSE 
BEGIN  "PRESET  DFA  TO  FALSE" 

00000000 
00000000 
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END  "PRESET" 

END  "DFT" 

"BUFFER/FILE  TABLE  —  ONE  ENTRY  PER  CURRENTLY  OPENED  FILE" 

TABLE  BFT  R  I  6  S  $ 

BEGIN 

ITEM  BFC  I  32  U  $ 

"BFC  ($  'FILENUMS)  =  INDEX  OF  FIRST  SYSBUF 
WORD  WHERE  BUFFERS  AND  CONTROL  WORDS  FOR  FILE 
■FILENUM  BEGIN" 

END 

"SYSTEM  BUFFER  AREA" 

TABLE  SYSBUF'  TABLE  V/^S  $ 

BEGIN 

ITEM  SYSBUF  I  32  S  $ 

END 

"SYSINP  AND  SYSOUT  ARE  ASSUMED  OPENED" 

FILE  AIRFIELD 

MODE  e  OPEN  lOCSOPEN'INP  (H(AIRFIE LD)) 

INPUT  lOCSINP  (  =  AIRFIELD'STAT) 

SHUT  lOCSSHUT’INP  (  )  $ 

ITEM  AIRFIELD'STAT  I  32  S  $ 

"THE  FOLLOWING  THREE  ITEMS  AND  THE  AF'PARAMS  TABLE  CONSTITUTE  THE 
AIRFIELD  FILE  RECORD  STRUCTURE" 

ITEM  AF'NAME  H  8  $  "2  WORDS" 

ITEMAF'LATFS  "IWORD" 

ITEM  AF' LONG  F  $  "IWORD" 

TABLE  AF'PARAMS  VI  2  P  $  "25  WORDS  WITH  NENT" 

BEGIN 

ITEM  AF/PARAM'l  I  32  S  $ 

ITEM  AF'PARAM'2  F  $ 

END 

"FUNCTIONAL  RECORD  LENGTH  IS  29  WORDS" 

"DECLARE  SYSINP  BUFFER" 

ITEM  SYSINP'BUF  H  8  0  $ 

"NOW,  BRING  IN  THE  REPRESENTATION  PARAMETERS  FOR  AIRFIELD  FILE  FROM 
SYSINP.  THESE  PARAMS  ARE  FREE  FIELD.  THE  GROUP  OF  THEM  CONSTITUTES 
AN  FPT  ENTRY.  THE  PARAMS  ARE 
AIRFIELD 
29 
10 
3 
9 

AIRFIELD  IS  THE  HOLLERITH  FILE  NAME 
29  IS  THE  WORDS  PER  FUNC  REC 

10  INDICATES  THAT  THE  REPRESENTATIONAL  RECORD  IS  A  BLOC  OF  10  FUNC  RECORDS 
3  MEANS  THE  FILE  IS  THE  FOURTH  FILE  ON  A  TAPE  REEL  (0  -  ORIGIN  INDEXING) 

9  MEANS  TAPE  DRIVE  9  IS  THE  DEVICE 
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"NOTE  THAT  IT  IS  A  SIGNIFICANT  FEATURE  OF  THE  JSERVICE  ROUTINES  OF  THIS 
EXAMPLE  THAT  FILE  PARAMETERS  MAY  BE  'BOUND'  AT  EXECUTION  TIME" 

"BRING  IN  FIRST  SYSINP  RECORD" 

GOTO  BUF'FILLER  $ 

'DECODE  SYSINP'BUF  (, BUF'FILLER) 

FILE  NAME  ($2$),  FUNC'REC'LENGTH  ($2$),  FUNCS'PER'REP  ($2$), 

BASE'NUM  ($2$),  DEVICE  ($2$)  $ 

CLOSE  BUF'FILLER  $ 

BEGIN 

"THIS  CLOSE  KEEPS  THE  BUFFER  FILLED  (FROM  SYSINP)  FOR 
THE  'DECODE  STATEMENT  ABOVE" 

INPUT  SYSINP  "FILE  RECORD  TO"  SYSINP'BUF  $ 

END 

"NOTE  THAT  FPT  ENTRY  2  NOW  CONTAINS  THE  AIRFIELD  FILE  PARAMS.  IOCS 
WILL  TRANSFER  THESE  PARAMS  TO  AN  ENTRY  IN  FPTW  WHEN  THE  FILE  IS  OPENED. 
IOCS  AND  lOBS  WORK  WITH  THE  PARAMS  AS  THEY  APPEAR  IN  FPTW" 

"OPEN  THE  FILE" 

OPEN  AIRFIELD  MODE  0$ 

"READ  FROM  THE  FILE" 

INPUT  AIRFIELD 

AF'NAME,  AF'LAT,  AF'LONG,  AF'PARAMSS 
"CHECK  FOR  EOF" 

IF  AIRFIELD'STAT  EQ  3  $ 

BEGIN  "EOF  CODE"  END 
IF  AIRFIELD'STAT  EQ  2  $ 

BEGIN  "BAD  TRANSMISSION  CODE"  END 


"THE  FOLLOWING  EXAMPLE  ILLUSTRATES  ANOTHER  USAGE  TO  WHICH  THE 
'EXECUTE  STATEMENT  MAY  BE  PUT.  THIS  USAGE  MONITORS  ARITHMETIC  OVERFLOWS" 
'EXECUTE  ENABLE  (OVERFLOW)  ($0$)  OVF'l.S 


'EXECUTE  DISABLE  (OVERFLOW)  ($0$)  $ 

"THE  FIRST  'EXECUTE  INFORMS  THE  CPU  (DEVICE  0)  TO  BEGIN  MONITORING  FOR 
OVERFLOWS.  THE  SECOND  'EXECUTE  CAUSES  OVERFLOW  MONITORING  TO  BE 
SUSPENDED.  THE  MONITORING  IS  PERFORMED  FOR  ALL  STATEMENTS  BETWEEN 
THE  TWO  'EXECUTES.  OVF'l  NAMES  A  CLOSE  WHICH  WILL  BE  INVOKED  WHEN  AN 
OVERFLOW  OCCURS" 


SHUT  AIRFIELD  $ 
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PROC  lOCSOPEN'INP  (NAME'OF'FILE)  $  "OPEN  INPUT  SERVICE" 

•ENTRANCE  ICCSCPEN'OUT  (NAME'OF'FILE)  $  "OPEN  INPUT  SERVICE" 

ITEM  NAME'OF'FILE  H  24  $  "HOLLERITH  FILE  NAME" 

'ENTRANCE  lOCSINP  (=FILESTAT)  S  "INPUT  SERVICE" 

'ENTRANCE  lOCSOUT  (  )  $  "OUTPUT  SERVICE" 

•ENTRANCE  lOCSINS  (  )  $  " INSERT  SERVICE" 

•ENTRANCE  lOCSDEL  (  )  $  "  DELETE  SERVICE" 

•ENTRANCE  lOCSSHUT'INP  S  "SHUT  SERVICE  FOR  INPUT" 

ITEM  FILESTAT  I  32  S  $  "FILE  STATUS  FLAG" 

BEGIN  "IOCS  COMPLEX" 

"WORKING  PARAMS" 

ITEM  FPT'INDEX  I  32  U  $ 

ITEM  SYSIND  I  32  S  $ 
lOCSOPEN'INP. 

"LOOK  UP  NAME'OF'FILE  IN  FPT  TO  FIND  INDEX  OF  ENTRY  WITH  NAME'OF'FILE" 
FOR  I  =  ALL  (FILENAME)  $ 

BEGIN 

IF  FILENAME  ($  1$)  EQ  NAME'OF'FILE  $ 

BEGIN 

FPT'INDEX  =  I  S 
GOTO  lOCSOPEN'  I  $ 

END 

END 

"NAME'OF'FILE  NOT  IN  FPT  —  ERROR  CODE  HERE" 
lOCSOPEN'I. 

"NOW  MOVE  FPT  ENTRY  AT  FPT'INDEX  TO  FPTW  ENTRY  AT  'FILENUM  FOR  LATER 
EASE  OF  ACCESS" 

ENTRY  (FPTW  ($  'FILENUM  $)  =  ENTRY  (FPT  ($  FPT  'INDEX  $))  $ 

"NOW  GO  ASSIGN  (AND  POSITION)  DEVICE  AND  RESERVE  BUFFER  SPACE 
lOBSOPEN'INP  (  )  $ 

RETURN  $ 

"END  OF  lOCSOPEN'INPV 
lOCSINP.  "CODE  FOR  INPUT  SERVICE" 

"GET  THE  NEXT  LOGICAL  RECORD" 
lOBSINP  (  =  SYSIND)  $ 

"WAS  THERE  A  TRANSMISSION  ERROR" 

IF  SYSIND  EQ  -1  S 

FILESTAT  =  SYSIND  S 
"WAS  THERE  AN  END  OF  FILE" 

IF  SYSIND  EQ  -2  $ 

FILESTAT  =  SYSIND  $ 

"TRANSMISSION  WAS  OK  —  NOW  MOVE  BUFFER  TO  lO 
OPERAND  (S)  SPECIFIED  IN  INPUT  STATEMENT" 

TBL  (SYSBUF,  SYSIND,  FUNC'REC LENGTHW($'FILENUM  $)  )  $ 

RETURN  $ 

"END  OF  lOCSINP" 
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lOCSSHUT'INP.  "ENTRANCE  TO  SHUT  FILE" 

IF  DEVICE  W  ($  '  FILENUM  $)  LS  8  $ 

BEGIN  "REWIND  TAPE" 

WAIT'SHUT, 

■EXECUTE  STAT'CHECK  (  =  TEMPI) 

($  DEVICEW  ($  'FIL£NUM$)  $)$ 

IF  TEMPI  EQ  0  $  GOTO  WAIT'SHUT  $ 

"INITIATE  REWIND" 

■EXECUTE  REWIND  ( ) 

($  DEVICEW  ($  ■  FILfNUM  $  )  $ 

END 

"NOW  UNRESERVE  DEVICE" 

DFA  ($  DEVICE  ($  'FILENUM  $)  $)  =  0  $ 

RETURN  $ 

"NOTE  — 

DEVICE  PROCEDURE 

STAT'CHECK  (  =  STAT) 

IS  PERFORMED  INSTANTANEOUSLY 

STAT  =  1  IF  DEVICE  READY  WITH  NO  ERRORS 

=  2  IF  DEVICE  READY  BUT  LAST  TRANSMISSION  OPERATION 

RESULTED  IN  ERROR 

=  3  IF  DEVICE  READY  BUT  LAST  TRANSMISSION  WAS  A 

READ  WHICH  ENCOUNTERED  AN  END  OF  FILE  MARK 
=  0  IF  DEVICE  NOT  READY 

STAT  TAKES  ONLY  0  AND  1  AS  VALUES  IF  THE  LAST  OPERATION  ON  THE 
DEVICE  WAS  NOT  A  TRANSMISSION  (e.g.,  REWIND) 

PROC  lOBSOPEN'INP  (  )  "ASSIGN  DEVICE  AND  POSITION" 

■ENTRANCE  lOBSINP  (  =  SYSBUF'INDEX)  $ 

ITEM  SYSBUF'INDEX  I  32  S  $ 

BEGIN  "lOBS  COMPLfX" 

ITEM  TEMPI  I  32  U  $ 

ITEM  TEMP2  I  32  U  $ 

"CODE  FOR  lOBS'OPEN'INP  FOLLOWS" 

"CHECK  TO  SEE  IF  DEVICE  HAS  ALREADY  BEEN  ASSOCIATED  WITH  A  FIL£" 

IF  DFA  ($  DEVICEW  ($'FIL£NUM$)  $  )  $ 

BEGIN  "IN  USE" 

"ERROR  CODE  HERE" 

END 

"NOW  SET  DFA  TO  SHOW  DEVICE  IS  ASSIGNED  TO  FILE.  ALSO  SET  DF  TO  VALUE 
OF  FILENUM  OF  ASSOCIATED  FILE" 

DFA  ($  DEVICEW  ($  'FILENUM  $)$)  =  !  $ 

DF  ($  DEVICEW  ($  'FILENUM  $)  $)  =  'FILfNUM  $ 

"NOW  FIGURE  OUT  HOW  MUCH  BUFFER  SPACE  TO  GET" 
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TEMP  1  =  FUNC'REC  LENGTH  W  ($  'FILENUM  $)  * 

FUNCS'PER'REPW  ($  'FILENUM  $)  +  1  $ 

"GET  INDEX  IN  SYSBUF  OF  FIRST  WORD  OF  BUFFER  COMPLEX  FOR  THIS  FILE- 
TEMPI  =  RESERVE'SYSBUF  (TEMPI)  $ 

"NOTE  RESERVE'SYSBUF  IS  A  SYSTEM  FUNCTION  DESIGNED  TO  ALLOCATE 
SPACE,  AS  SPECIFIED  BY  AN  INPUT  PARAM,  IN  SYSBUF.  THE  VALUE  OF  THIS 
FUNCTION  AFTER  EXECUTION  IS  THE  SYSBUF  FIRST  WORD  INDEX" 

"SET  THIS  INDEX  UP  IN  BFT" 

BFC($  'FILENUM  $)  =  TEMPI  $ 

"NOW  DO  DEVICE  POSITIONING.  IF  TAPE,  REWIND,  IF  DISK,  DO  NOTHING. 
FIRST,  WAIT  FOR  UNIT  TO  COME  READY" 

WAirO. 

•EXECUTE  STAT'CHECK  (  =  TEMPI) 

($  DEVICEW  ($  FILENUM  $)  $)  $ 

"WAIT  LOOP" 

IF  TEMPI  EQ  0$ 

GOTO  WAIT'D  $ 

IF  DEVICEW  ($  '  FILENUM  $)  LS  8  $  "TAPE  OR  DISK" 

BEGIN  "TAPE,  INITIATE  REWIND" 

•EXECUTE  REWIND  ( )  ($  DEVICEW  ($  '  FILENUM  $)  $)  $ 

"BEGIN  WAIT  LOOP" 

WAIT'l.  "STAT'CHECK  IS  INSTANTANEOUS" 

•EXECUTE  STAT'CHECK  (  =  TEMPI) 

($  DEVICEW  ($  '  FILENUM  $)  $)  $ 

IF  TEMPI  EQ  0  $  GOTO  WAIT'l  $ 

"END  REWIND  WHEN  TEMPI  EQ  0" 

"NOW  INITIATE  TAPE  POSITIONING" 

•EXECUTE 

SKIP'FILES'FORWARD  (BASE'NUM  ($  'FILENUM  $)) 

($  DEVICEW  ($  'FILENUM  $)  $)  $ 

WAIT '2.  "WAIT  TILL  DONE  —  NOOP  IF  BASENUM  =  0" 

•EXECUTE  STAT'CHECK  (  =  TEMPI) 

($  DEVICEW  ($  '  FILENUM  $)  $)  $ 

IF  TEMPI  EQ  0  $  GOTO  WAIT'2  $ 

RETURN  $  "END  OF  SKIP' FI LE'FORWARD" 

END 

"NOW  START  INPUT  INTO  BUFFER" 

lOBS  READ  ('FILENUM,  BASE'NUMW  ($  '  FILENUM  $)  )  $ 

"NOTE  BASE'NUMW  ABOVE  WILL  NOT  BE  USED  BY  lOBSREAD  IF  DEVICE  IS  TAPE" 
RETURN  $  "END  lOBSOPEN'  INP" 

lOBSINP.  "ENTRANCE  TO  lOBS  FOR  'INPUT'  SERVICE  CALL" 

TEMP2  =  REM  (POS,  FUNCS'PER'REPW  ($  'FILENUM  $)  )  $ 

"TEMP  2  NOW  CONTAINS  THE  ORDINAL  OF  THE  FUNCTIONAL  RECORD  IN 
THE  BUFFER" 
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IF  TEMP2  NQ  1$ 

BEGIN  "A  READ  WAS  INITIATED  PREVIOUSLY" 

WAIT'INP. 

IF  SYSBUF  ($  BFC  ($  'FILENUM  $)  $)  EQ  0  $ 

GOTO  WAIT'INP  $  "BUFFER  IS  STILL  FILLING" 

"WHEN  DONE,  TEST  FOR  EOF" 

IF  SYSBUF  ($  BFC  ($  '  FILENUM  $)  $)  EQ  3  $ 

BEGIN 

"CODE  TO  PROCESS  END  OF  FILE" 

END 

"NOW  TEST  FOR  TRANSMISSION  ERROR  " 

IF  SYSBUF  ($  BFC  ($  '  FILENUM  $)  $)  EQ  2  $ 

BEGIN 

"CODE  TO  PROCESS  ERROR" 

END 

END  "BUFFER  IS  FILLED" 

"NOW  COMPUTE  BUFFER  ADR" 

SYSBUF'INDEX  =  BCF  ($  'FILENUM  $)  +  FUNC'REC LENGTHW  ($  'FILENUM  $)  * 
TEMP2  +  1  $ 

"INCREMENT  POS" 

POS  =  POS  +  1  $ 

"NOW  TEST  TO  SEE  IF  BUFFER  NEEDS  FILLING" 

TEMP  2  =  REM  (POS,  FUNCS'PER'REPW  (  $  'FILENUM  $))  $ 

IF  REM  EQ  0  $ 

BEGIN 

"IF  DISK,  COMPUTE  NEW  DISK  ADDRESS  AND  STORE  IN  TEMP  2" 
lOBS  READ  ('FILENUM,  TEMP2  )  $ 

END 

"RETURN  —  ALL  DONE" 

END  "lOBSINP" 

"READ  COMPLETION  ROUTINE" 

PROC  ENDREAD  (  )  $ 

ITEM  TEMP  I  32  S  $ 

BEGIN 

"FIND  OUT  WHICH  DEVICE  CAUSED  INTERRUPT" 

'EXECUTE  WHICH  (  =  TEMP)  ($  0  $) 

"DEVICE  PROCEDURE  'WHICH'  IS  INSTANTANEOUS.  IT  ASKS  THE 
CPU  'DEVICE'  WHICH  OTHER  DEVICE  CAUSED  THE  LAST  INTERRUPT. 

THE  ANSWER  IS  PLACED  IN  TEMP" 

"NOW  DO  STATUS  CHECK  —  PLACE  STATUS  IN  BUFFER  CONTROL  WORD" 
'EXECUTE  STAT'CHECK 

(  =  SYSBUF  ($  BCF  ($  DF  ($  TEMP  $)  $)  $)  ) 

($  TEMP  $) 

"RETURN" 

END 
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PROC  lOBSREAD  (NFILE,  DISKADR) 

ITEM  NFILE  I  32  S  $ 

ITEM  DISKADR  I  32  U  $ 

BEGIN 

ITEM  TEMPI  I  32  S  $ 

"FIRST  SET  BUFFER  CONTROL  WORD  TO  0  —  BUFFER  WILL  BE  FILLING  WHEN  WE 
EXIT  THIS  PROC" 

SYSBUF  ($  BFC  ($  NFILE  $)  $)  =  0  $ 

"IS  DEVICE  DISK  OR  TAPE" 

IF  DEVICEW  ($  NFILE  $)  LS  8  $  "TAPE" 

GOTO  TAPE'READ. 

DISK'READ.  "WAIT  FOR  DISK  READY" 

'EXECUTE  STAT'CHECK  (  -  TEMPI) 

($  DEVICEW  ($  NFILES)  $)  $ 

IF  TEMPI  EQ  0  $  GOTO  DISK'READ  $ 

"NOW  INITIATE  DISK  READ  —  NOTE  THAT  THE  DEVICE  PROCEDURE 
READ  DISK  IS  NON-IN STANTANEOUS" 

'EXECUTE  READDISK  (  DISKADR,  "DISK  ADDRESS" 

"NUM  WORDS  TO  READ"  FUNC'REC  LENGTHW  ($NFILE$)* 

FUNCS'PER'REPW  ($NFILE$), 

"CORE  LOCATION  OF  BUFFER"  'LOC  (  SYSBUF)  +  BFC  ($  NFILE  $)  +  1  )  $ 
"DEVICE"  ($  DEVICEW  ($  NFILES)  $) 

"COMPLETION  ROUTINE"  ENDREAD  (  )  $ 

RETURN  $ 

TAPE'READ.  "WAIT  FOR  TAPE  READY" 

'EXECUTE  STAT'CHECK  (  =  TEMPI) 

($  DEVICEW  ($  NFILES)  S)  S 
IF  TEMPI  EQ  0  $  GOTO  TAPE'READ  S 

"NOW  INITIATE  TAPE  READ  —  DEVICE  PROCEDURE  IS  NON-INSTANTANEOUS" 
'EXECUTE  READTAPE  (  FUNC'REC  LENGTHW  (SNFILES)* 

"NUM  WORDS  TO  READ"  FUNCS'PER'REP  (S  NFILES), 

"CORE  BUFFER  ADDRESS"  'LOC  (SYSBUF)  +  BFC  (SNFILES)  +  1  )  S 
"DEVICE"  (S  DEVICEW  ($  NFILES)  S) 

"COMPLETION  ROUTINE"  ENDREAD  (  )  S 

"  RETURN" 

END  "lOBSREAD" 
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3.2.2.12  The  Stop:sta1’ement 


The  stopistQtemenf  has  the  form: 


STOP  e$ 

A  stop;statement  has  the  effect  of  terminating  the  sequence  of  executions  Initiated 
when  the  mainrprogram  began  executing.  This  Is  true  whether  or  not  the  stoprstatement 
is  executed  in  the  main: program  or  In  a  closed  subroutine  subordinate  to  the  mainrprogram . 
The  stopistatement  In  a  closed  subroutine  does  not  cause  control  to  pass  to  the  calling 
program . 

3.2.2.13  The  Pauserstatement 

A  pauseistatement  is: 

PAUSE  6  statement: name  0 

optIonal:servIce:call  0  $ 

When  g  pause:statement  Is  executed,  the  servicercall,  if  Included,  Is  operated.  Upon 
completion  of  the  service:call  execution,  the  sequence  of  executions  Initiated  when  the 
mainrprogram  began  executing  is  suspended.  This  Is  true  whether  or  not  the  pauserstatement 
was  executed  in  the  mainrprogram  or  In  one  of  the  closed  subroutines  subordinate  to  It. 

When  execution  Is  restarted  by  some  external  means,  the  first  statement  executed  Is  the 
one  labelled  by  statementrname .  Note  that  the  execution  of  a  pauserstatement  which 
has  no  servicercall  takes  place  in  the  same  manner  as  above  except,  of  course,  that 
there  is  no  servicercall  operation.  It  Is  anticipated  that  a  common  use  of  the  servicercall 
will  be  to  output  some  sort  of  identification  information  (e.g.  to  the  printer). 

3.2.2. 14  Rounded:assignment:statements 

A  roundedrassignmentrstatement  has  the  form: 


numericrvariable  0-0 

numericrformula  0  'ROUNDED  0  $ 

The  roundedrassignmentrstatement  produces  exactly  the  same  result  when  the  evaluated 
numerlcrformuta  Is  assigned  to  the  numericrvariable  as  would  be  obtained  if  the  numeric: 
variable  were  declared  in  an  itemrdeclaration  with  the  abbreviation  R.  (ROUND^CT has 
no  effect  if  indeed  numericrvariable  was  declared  In  an  itemrdeclaration  with  the 
abbreviation  R.) 
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3.2.2.15  Extension  to  Program 


Program  means: 

START  9  optlonahorigin  0$ 

0  statement: list  0 

TERM  0  optional:statement:name  0  $ 


or: 


CLOSE  0  name  0 

START  0  optional :origin  0  $ 
statement: ITsF"5  TERM  0  $ 


or: 


START  optional  rorigin  0  procedure:declaration  0 
TERM  B  $ 

The  meaning  of  the  first  two  forms  is  given  in  CED  2487.1  .  The  third  form  provides  the 
facility  for  compiling  "stand-alone"  procedures.  The  effect  of  optionahorigin  is  the 
same  as  for  the  first  two  forms.  The  program  defined  by  the  third  form  has  the  same  name 
as  the  procedure: name  in  the  procedure:declaration .  The  program  may  also  be  referenced 
by  the  al ternate:entrance:name  which  appears  in  any  al ternate:procedure:entrance: 
declaration.  A  program  defined  by  the  third  form  is  invoked  precisely  as  any  procedure. 
Also,  the  procedure: name  and  any  alternate:entrance:names  are  category  3  names. 

3.2.3  Nucleus  Features 

Based  on  the  criteria  as  described  in  Section  1  (1  .3)  and  the  users  responses  to  the 
JOVIAL  Application  Questionnaire  and  Interview  questions  (contained  in  Appendix  3) 
as  summarized  in  Appendix  2  and  4,  respectively,  the  following  features  are  recommended 
for  inclusion  in  the  nucleus.  The  references  are  to  the  appropriate  sub-sections  of  the 
JOVIAL  Application  Questionnaire  (JAQ),  Section  3  of  this  report  (Section  3),  Interview 
Response  Analysis  in  Appendix  4(1),  and  the  Approach  for  Change  (AFC)  .  Specifica¬ 
tion  of  each  feature  is  contained  in  the  JOVIAL  Application  Questionnaire  for  the  current 
JOVIAL  features  considered  and  in  Section  3  for  recommended  extentions.  Justification 
for  inclusion  of  features  as  a  nucleus  is  contained  in  Appendix  2  (which  is  organized 
by  AFC  numbers)  and  Appendix  4  (which  is  organized  by  I  numbers). 
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Feafure 

JAQ/Sec ,  3 

AFC/I 

1) 

Item  Type  Hollerith 

J3. 5. 1.1. 11.1 

Al. 1.1.1 

2) 

HollerUh  Formula 

J3.5.2.5 

Al. 1.1.1 

3) 

Character  Data  Size  Attribute 

J3.5.1.1.14 

Al.1.1.3 

4) 

Operations  on  Literal  Data 

3. 2. 2. 4 

1  3,1  7 

5) 

Explicit  Size  Attribute 

J3. 5. 1.1. 14 

Al.1.3 

6) 

Structure  Table 

J3. 5. 1.3.1 

Al.2.2 

7) 

Table  Variability  Attribute  -  Rigid 

J3.5.1.3.4 

Al.2.3 

8) 

Table  Variability  Attribute  -  Variable 

J3.5.1.3.4 

Al  .2.3 

9) 

NENT 

J3.5.2.2.2.6 

Al.2.3 

10) 

BYTE 

J3.5.2.2.2.2 

A2.2 

11) 

Subscripting  -  Expressed  as  Complex 

Numeric  Formula 

J3.5.2.2.1 

A2.4 

12) 

Subscripting  -  Nested 

J3.5.2.2.1 

A2.4 

13) 

Table  Entry  Referencing 
(ENTRY  only  may  be  used) 

J3.5.2.6 

A2.5 

14) 

Computer  Representation  of  Data 

J3. 5. 1.1. 15 

A3 

15) 

Computer  Representation  of  Numeric 

Items  and  Constants 

3. 2. 2. 5 

1  11 

16) 

Octal  Constants,  Hexadecimal  Constant 
(Must  implement  one  or  the  other, 
may  implement  both) 

J3.5. 1.1.1 

3.2.2. 1 

A3. 1,1  12 

17) 

Basic  Table  Structure  Attribute-Parallel 

J3.5.1.3.5 

A3. 3 

18) 

Basic  Table  Structure  Attribute  -  Serial 

J3.5.1 .3.5 

A3. 3 

19) 

Defined  (Table)  Packing 

J3.5.1 .3.6.2 

A3. 5 

20) 

Independent  Overlay  Declaration 

J3. 5. 1.7.1 

A3. 6 

21) 

'LOC 

J3.5.2.1.1 

A3. 8 

22) 

Parenthesized  Numeric  Formulas 

J3.5.2.3.1 

A4 

23) 

Mixed  Item  Types  in  Numeric  Formulas 

J3.5.2.3.5 

A4 

24) 

Item  Type  Integer 

J3.5.1.1 .4 

A4 

25) 

Item  Type  Fixed  Point 

J3.5.1.1.5 

A4 

26) 

Item  Type  Fixed  Point  -  Scale  in 

Declaration  Blank  or  Zero 

J3.5.1.1.5 

A4 

27) 

Item  Type  Floating  Point 

J3.5.1.1.9 

A4 

28) 

Sign  Attribute 

J3.5.1.1.6 

A4.4 

29) 

Prefix  +  and  - 

J3.5.2.3.2 

A4.5 

30) 

Precedence  of  Unary  Operators 
(Alteration  of  precedence  of  +,  -) 

3.2.26 

1  17 

31) 

Exponentiation  Operator  (Notation**only) 

J3.5.2.3.3 

A4.5 

32) 

Relational  Formulas  (excluding  chained) 

J3.5.2.7 

A6.1 

33) 

Boolean  Formulas  -  with  AND,  OR,  NOT 

J3.5.2.8 

A7.1 

34) 

Item  Type  Boolean 

J3. 5. 1.1 .12 

A7.2 

35) 

Numeric  Item  Type  Conversion  in  the 
Assignment  Statement 

J3.5.3.1 

A8 
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Feature 

JAQ/Sec.  3 

AFC/I 

36) 

Boolean  Assignment  Statement 

J3.5.3.1 

A8 

37) 

Item  Preset 

J3. 5. 1.6.1 

A8.1 

38) 

Table  Preset 

J3.5.1 .6.2 

A8.1 

39) 

Compound  Statement 

J3.5.4.2 

A9. 1 

40) 

GOTO  Statement 

J3.5.5 

A9.2 

41) 

STOP  Statement 

3.2.2.12 

A9.3, 1  24 

42) 

IF  Statement 

J3.5.5.3 

A9.4.1 

43) 

FOR-loop-One  Factor 

J3.5.5.5 

A9.5 

44) 

FOR-loop-Two  Factor 

J3.5.5.5 

A9.5 

45) 

FOR-loop-Three  Factor 

J3.5.5.5 

A9.5 

46) 

FOR- loop- Decrementing 

J3.5.5.5 

A9.5 

47) 

Test  Statement 

J3.5.5.5.6 

A9.5.4 

48) 

Program 

J3.5.4.10 

A9.6,A9.7 

49) 

Procedure  (Excluding  Function) 

J3.5.4.6 

A9.6.1 

50) 

Function 

J3.5.4.8 

A9.6.1 

51) 

Alternate  Entrances  to  Procedures 

and  Functions 

3. 2. 2. 9 

1  28 

52) 

Close 

J3.5.4.5 

A9.6.2 

53) 

Return  Statement 

J3.5.5.6 

A9.6.3 

54) 

Direct  Code 

J3.5.4.4 

A9.8 

55) 

Data  Editing  and  Conversion 

3.2.2.11.3 

1  31 

56) 

Multiple  Statement  Labels 

J3.5.4.3 

All  .2 

57) 

ALL 

J3.5.5.5.5 

A12.5 

58) 

COMPOOL 

J3.5.6.1 

A12.6 

3.2.4 

Optional  Features 

Based 

on  the  same  criteria  and  data  as  indicated  in 

Section  3.2.3  above. 

the  following 

features  are  recommended  for  the  optional  category. 

Feature 

JAQ/Sec.  3 

AFC/I 

1) 

Hexidecimal  Constants 

3.2.2. 1 

1  12 

2) 

Simplified  Hollerith  Constant  Form 

3. 2. 2. 2 

- 

3) 

User  Definable  Character  Encoding 

Scheme  ('CHARCODE) 

3. 2. 2. 3 

1  2 

4) 

Item  Type  Status 

J3. 5.1 .1 .13 

Al.1.2 

5) 

Status  Formulas  (Must  be  implemented 

together) 

J3.5.2.5 

A1 .1 .2 

6) 

Explicit  Status  Size  Attribute 

J3. 5. 1.1. 14 

A1  .1.3 

7) 

Structure  Array 

J3.5.1.2 

Al.2.1 

8) 

NWDSEN 

J3.5.2.1.2 

A1 .2.4 

9) 

BIT 

J3. 5. 2. 2. 2.1 

A2.1 
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Feature 

JAQ/Sec.  3 

AFC/I 

10) 

Ordinary  Packing  (Dense  only  is  allowed) 

J3.5.1. 3.6.1 

A3. 4 

11) 

Absolute  Value  Operator 

(ABS  only  is  allowed) 

J3.5.2.3.4 

A4.7 

12) 

Extended  Precision  Numeric  Items 

and  Constants 

3.2.2.10 

1  16 

13) 

Chained  Relational  Formulas 

J3.5.2.7 

A6.2 

14) 

Array  Preset 

J3 .5. 1.6.3 

A8.1 

15) 

Exchange  Statement 

J3.5.3.2 

A8.3 

16) 

IFEITH/ORIF  Statements 

J3.5.5.4 

A9.4.2 

17) 

Index  Switch 

J3.5.5.2 

A9.4.3 

18) 

Item  Switch 

J3.5.5.1 

A9.4.4 

19) 

Close  in  Parameter  List  (of  Procedure) 

J3.5.4.6 

A9.6.1 

20) 

Statement  Label  in  Parameter  List 

(of  Procedure) 

J3.5.4.6 

A9.6.1 

21) 

'PROGRAM  Declaration 

J3.5.4.11 

A9.7 

22) 

Item  Declaration 

J3.5.1.1.2.2 

All.l 

23) 

Define  Directive 

J3.5.6.2 

A12.1 

24) 

Extended  Define  Directive 

3. 2. 2.7 

1  35 

25) 

MODE  Directive 

J3.5.1.1.3 

A12.2 

26) 

Extended  Mode  Directive 

3. 2. 2. 8 

A12.2,l  36 

27) 

Like  Table  Declaration 

J3.5.1.3.2 

A12.4 

28) 

Device  oriented  Input/Output  Module 

3.2.2.11.1 

1  33 

29) 

Functional  File  Input/Output  Module 

3.2.2.11.2 

1  32 

30) 

Pause  Statement 

3.2.2.13 

1  25 

31) 

Extension  to  Program  ("Stand-alone"  Procedure) 3. 2. 2. 15 

- 
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SECTION  IV 


ADDITIONAL  RECOMMENDATIONS 


4.1  Specific  Study  Topics 

During  the  course  of  the  interviews  several  unplanned  for  auxiliary  topics  of  unusual 
interest  were  discussed.  Some  of  these  subjects  were  concerned  with  general  language 
aspects,  others  with  specific  required  features,  and  still  others  with  implementation 
constraints.  Following  is  a  list  of  the  more  important  concepts  raised  In  the  discussions, 
the  details  of  which  are  included  in  Appendix  1  .  DDI  strongly  recommends  in-depth 
studies  of  all  of  the  concepts  for  possible  inclusion  in  future  JOVIAL  language  extensions. 

4.2  General  Concepts 

1.  JOVIAL  Input/Output  -  Many  comments  were  made  indicating  that  some 
JOVIAL  input/output  specification  should  be  included  in  the  language. 

DDI  has  included  a  set  input/output  specifications  in  the  Extension  Specifi¬ 
cations,  however,  further  effort  Is  required  to  increase  the  comprehensiveness 
of  these  specifications. 

2.  JOVIAL  Library  -  It  was  recommended  that  a  standard  JOVIAL  Source 
Language  Library  should  be  generated  and  available  to  all  users. 

3.  JOVIAL  COMPOOL  -  It  was  proposed  that  the  COMPOOL  be  rigidly 
specified  in  the  language  rather  than  permitting  individual  interpretations 
of  the  concept  by  the  implementors  of  the  JOVIAL  language. 

4.  Real  Time  Concepts  -  It  was  suggested  that  statements  facilitating  real 
time  applications  should  be  included  in  the  language. 

5.  List  Processing  -  It  was  proposed  that  some  of  the  notions  associated  with 
the  concepts  of  list  processing  should  be  included  in  this  language. 

4.3  Specific  Concepts 

The  following  specific  functions  were  recommended  for  inclusion  in  the  JOVIAL  language: 

1  .  Bit  string  items  with  associated  bit  string  operations. 

2.  Expanded  data  structuring  and  associated  data  referencing  concepts. 

3.  Loader  and  Compiler  Directives. 

4.  Implied  subjects  and  objects  in  IF  statements. 

5.  Expanded  character  set. 

6.  Multiple  assignment  statement. 

7.  Non-linear  loop  incrementing. 
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4.4  Language/Compiler  Design  Goals 


During  discussions  the  following  general  language  and  compiler  design  goals  were 
considered  worthy  of  further  investigation: 

1.  Attainment  of  absolute  machine  independence. 

2.  Improved  readability  of  JOVIAL  computer  programs. 

3.  Less  verbose . 

4.  Separate  function  from  functional  software. 

5.  Compatibility  with  manufacturer  software. 
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APPENDIX  I 


INTERVIEW  MATERIAL 


This  appendix  contains  a  list  of  the  agencies  and  firms  who  participated  in  the  study 
together  with  information  regarding  their  JOVIAL  Application  Questionnaire  and 
interview  responses,  DDI  interviewed  ten  military  agencies,  two  industrial  firms, 
and  one  non-military  governmental  agency  in  this  study.  Following  is  a  list  of  those 
organizations  interviewed  together  with  associated  abbreviations  that  are  used  to 
identify  them  throughout  this  and  associated  documents. 

1  .  ADC  Computer  Programming  and  Analysis  Center 

Ent  Air  Force  Base 

Colorado  Springs,  Colorado  -ADPAC 

2.  Computer  Sciences  Corporation 

650  N.  Sepulveda  Boulevard 

El  Segundo,  California  -CSC 

3.  Federal  Aviation  Agency 

800  Independence  Avenue,  S.W. 

Washington,  D.C.  -FAA 

4.  FOCCPAC 

U.S.  Navy 

Honolulu,  Hawaii  -FOCC 


5.  Operational  Program  Maintenance  Branch 
4th  Air  Force  Combat  Center 
Hamilton  Air  Force  Base 

San  Francisco,  California  -HAM 

6.  NAVCOSSACT 
Washington  Naval  Yard  Annex 

Washington,  D.C.  -NAVC 

7.  National  Civilian  Defense  Computer  Facility 

OIney,  Maryland  -NCDCF 

8.  Naval  Electronics  Laboratory 
Command  and  Control  Facility 

San  Diego,  California  -NEL 
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9.  Defense  Communication  Agency 

NJaval  Military  Command  System  Support  Center 
Pentagon 

Washington,  D.  C.  -NMCSSC 

10.  Headquarters  NORAD 
NHCP 

Ent  Air  Force  Base 

Colorado  Springs,  Colorado  -NHCP 

1 1  .  Rome  Air  Development  Center 
Griffiss  Air  Force  Base 

Rome,  New  York  -RADC 


12.  Headquarters  SAC 

Offutt  Air  Force  Base 

Nebraska  -SAC 


13  Trans  World  Airways  Data  Processing  Center 
King  Road 

Rockleigh,  New  Jersey  -TWA 


The  selected  organizations  responded  to  the  JOVIAL  Application  Questionnaire 
(JAQ)  in  varying  degrees  of  detail.  Some  responded  qualitatively,  some  quanta- 
tively,  and  some  not  at  all .  Following  is  a  summary  of  the  responses  to  the  JAQ 
by  the  selected  respondents: 


1 . 

ADPAC- 

2. 

CSC- 

3. 

FAA- 

4. 

FOCC- 

5. 

HAM- 

6. 

NAVC- 

7. 

NCDCF- 

8. 

NEL- 

9. 

NMCSSC- 

10. 

NHCP- 

11. 

RADC- 

12. 

SAC- 

13. 

TWA- 

Complete  quantitative  response  to  three  JAQ's. 

No  JAQ  usage  rates  because  of  CSC's  role  as  a 
JOVIAL  compiler  writer  rather  than  a  JOVIAL  user. 
No  JAQ  usage  rates  were  given;  only  qualitative 
results  were  provided. 

Complete  quantitative  responses  to  three  JAQ's. 
Complete  quantitative  responses  to  one  JAQ. 
Complete  quantitative  responses  to  three  JAQ's. 
Complete  quantitative  responses  to  one  JAQ. 
Complete  quantitative  responses  to  one  JAQ, 
Complete  quantitative  responses  to  one  JAQ. 
Responses  received  too  late  to  be  considered  for 
analysis. 

Complete  quantitative  information  was  returned  on 
three  of  the  four  JAQ's. 

Complete  quantitative  information  was  provided  on 
four  JAQ's. 

Because  of  a  tight  schedule,  TWA  did  not  complete 
their  JAQ . 
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Eoch  of  the  numbered  sections  thot  follow  contain  information  summorizing  the  results 
obtained  from  eoch  respondent*  A  complete  description  of  the  respondent  is  given, 
his  response  to  the  JAQ  is  noted,  ony  written  interview  material  is  included  and  notes 
are  provided  thot  reflect  generol  impressions  gathered  from  the  questionnaire  and  inter¬ 
view.  The  respondents  ore  listed  in  eoch  section  occording  to  the  sequence  indicoted 
above,  Eoch  of  the  sections  contoining  data  from  the  respondent  is  orgonized  occording 
to  the  following  outline: 


1 . 

Orgonizotion  - 

Porticulor  applicotion  for  specific  agency. 

2. 

Contoct  - 

Orgonizotion  representotive  . 

3. 

Orgonizotion  Identifier  - 

Organization  obbreviation . 

4. 

Number  of  JAQ's  returned  - 

Self  Explonotory . 

5. 

Date  of  Interview  - 

Self  Explonotory, 

6. 

JAQ  Response  Notes  - 

Comments  obout  the  response  to  the  JAO. 

7. 

Application  - 

Information  about  each  applicotion 
responded  to  in  a  JAO, 

8. 

Interview  Notes  - 

Statements  of  actual  interview  responses  or 
interpretations  of  interview  responses  if 
required , 

1  .0  ADPAC 

1.1  Organization:  ADC  Computer  Programming  ond  Anolysis  Center 

ADPAC 

Ent  Air  Force  Base 
Colorodo  Springs,  Colorodo 

1.2  Contoct:  Lt,  Jon  Feller 


1  .3  Organization  Identifier:  ADPAC 

1  .4  Number  of  JAO’s  Returned:  4 


1  .5  Date  of  Interview:  14  Moy  1968 


1  .6  JAQ  Response  Notes: 


Three  of  the  JAQ's  returned  contain  response  doto  for  three  distinct  sub¬ 
applications.  These  are  identified  by  ADPAC-1,  ADPAC-2,  ADPAC-3.  There 
is  one  compiler  for  all  sub-applications.  Complionce  information  was  taken 
from  the  JAO  for  ADPAC-3. 


1  .7  AppI  icotion: 


(1)  Sub-appI icotion  ADPAC-1 
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Sub-gppl  leaf  Ion  Name; 


Special  Programs  Section 


Sub-application  Description: 

Data  reduction  and  analysis  for  radar  evaluation  and  SNOWTIME,  The  sub-application 
includes  editing,  statistical  calculation  and  data  extraction.  Sub-application  currently 
consists  of  7  computer  programs  with  more  expected  to  be  started  in  the  near  future. 
Some  computer  programs  were  converted  from  COBOL. 

Total  Number  of  JOVIAL  Statements:  5462 

Sub-application  Hardware  Configuration:  See  under  ADPAC-2, 

Operating  System:  No  information  given. 


Background: 


•  JOVIAL  was  used  because  it  was  the  language  best  suited  for  the  project. 

•  Average  years  experience  of  programmers:  3 

•  Average  years  JOVIAL  experience:  1 

•  Dialect  used:  JOVIAL  J3 

•  Compilation  speed:  Not  given. 

•  Compiled  code:  Not  relocatable. 

(2)  Sub-application  ADPAC-2 
Sub-application  Name:  SPACE  TRACK 

Sub-application  description: 


The  objective  of  the  sub-application  is  to  maintain  surveillance  of  all  earth  orbiting 
objects. 

Total  Number  of  JOVIAL  Statements: 


Computer  manufacturer  and  model 

High  speed  memory  storage 
Size 

Word  size  if  applicable 

Input/Output  devices 
Drum 

Manufacturer  and  model 

Storage  capacity 

Quantity  on  this  configuration 


1 400  (Approx . ) 
Philco  2000/212 


32K  words 
256K  six  bit  bytes 
48  bits 


Bryant 

10,000,000g  six  bit  bytes 
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Disc 


Manufacturer  and  model 
Storage  capacity 
Quantity  on  this  configuration 

Magnetic  tapes 

Manufacturer  and  model 
Recording  densities  permitted 
Quantity  on  this  configuration 

Card  punches 

Manufacturer  and  model 
Card  punch  speed 

Quantity  on  this  configuration  of  this  type 
Card  reader 

Manufacturer  and  model 
Card  read  speed 
Quantity  on  this  configuration 

Printer 

Manufacturer  and  model 
Printer  speed 

Quantity  on  this  configuration 

Paper  tape  reader 

Manufacturer  and  model 
Tape  read  speed 
Quantity  on  this  configuration 

Paper  tape  punch 

Manufacturer  and  model 
Tape  punch  speed 
Quantity  on  this  configuration 

Operating  system: 

Name:  DELTA 
Developer:  SDC 
Mode  of  operating  system:  Batch  Processing  and  Real  Time 

Background: 

•  JOVIAL  was  used  because  it  was  the  official  Air  Force  language. 

•  Average  years  experience  of  programmers:  SDC  -  5,  Military  -  3 

•  Average  years  JOVIAL  experience:  SDC  -  5,  Military  -  1 


IBM 


Philco 

1 , 000  I ines/min 
1 

0 


0 


0 

Ampex 

14 

0 
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Dialect  used:  JOVIAL  J3 


Compilation  speed:  Not  given. 

Compiled  Code:  "Applications  are  all  RPL". 

(3)  Sub-application  ADPAC-3 

Sub-application  Name:  Satellite  Archives  -  Storage  and  Retrieval 
Sub-application  Description: 

The  purpose  of  the  sub-application  Is  to  store  and  retrieve  satellite  observations  and 
element  sets.  The  current  Archives  system  programs  are  for  the  most  part  written  In 
TAC.  Only  one  short  program  has  been  written  In  JOVIAL  but  plans  for  the  future 
involve  rewriting  of  all  programs  in  JOVIAL. 

Total  Number  of  JOVIAL  Statements:  278 

Sub-application  Hardware  Configuration:  See  under  ADPAC-2 


Operating  System: 

Name:  COSMOS 
Developer:  SDC 

Mode  of  operation:  Batch  processing 
Background: 


•  JOVIAL  was  used  to  stay  compatible  with  other  projects  and  because  it  was  the 
official  Air  Force  language. 

•  Average  years  experience  of  programmers:  6 

•  Average  years  JOVIAL  experience:  Not  given 

•  Dialect  used:  J3 

•  Compilation  speed:  Not  given 

•  Compiled  code:  Not  given 

1.8  Interview  Notes: 


The  following  written  information  was  received  at  the  time  of  the  Interview. 
General: 

•  We  have  three  areas  of  application.  The  largest,  80%  of  our  JOVIAL  programs 
is  SPA  DATS  (496  L) .  The  Special  Projects  Section  has  15%.  The  smallest  Is 
Archives  with  5%, 
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•  Technical  data  an  the  status  af  aur  campiler  is  cantained  in  the  Archives  baaklet. 
A  descriptian  af  JOVIAL  library  rautines  and  diagnastic  messages  is  included, 

Alsa  included  is  a  sample  autput  and  user  instructians  far  the  utility  rautine 
REFORM, 

•  Canclusians:  Judging  fram  aur  usage  af  JOVIAL  twa  subsets  wauld  seem  ta  be 
needed.  One  an  extensian  af  AFM  100-24  JOVIAL  ta  facilitate  scientific  data 
analysis;  the  secand  a  limited  versian  withaut  many  af  the  features  af  AFM  100-24 
far  use  in  specific  applicatians  within  real  time  systems  which  require  extremely 
efficient  cade  and  minimum  care  utilizatian.  It  wauld  alsa  seem  desirable  ta 
include  specificatians  and  minimum  number  af  rautines  far  the  JOVIAL  library, 

HQ  ADC,  ADPAC,  Special  Pragrams  Sectian 


•  JOVIAL  pragramming  in  the  Special  Pragrams  Sectian  started  in  August  1967, 

The  first  implementatian  was  the  Radar  Evaluatian  System,  A  limited  versian  had 
been  implemented  in  COBOL,  It  was  desired  ta  include  mare  extensive  calcula- 
tians,  which  cauld  nat  be  dane  in  COBOL,  Bath  FORTRAN  and  JOVIAL  were 
cansidered.  Because  af  the  greater  pawer  and  flexibility  af  JOVIAL  It  was 
selected , 

•  The  JOVIAL  features  which  were  significant  in  this  decisian  were: 

The  ability  ta  mave  and  use  data  by  BYTE  modificatian . 

The  ability  ta  pack  data  in  care  tables  and  in  tape  recards. 

The  ability  ta  imbed  arithmetic  aperatians  in  subscripting  and  in  aperations, 
such  as,  BYTE($10  +  A* *3$)  where  A  is  a  laap  variable. 

The  ability  ta  averlay  data. 

The  define  statement. 

The  ability  ta  do  manual  canversian  af  input  data  enabling  the  same  data  fields 
ta  be  used  far  bath  numeric  and  alphabetic  data. 

•  Further  JOVIAL  pragrams  are  being  written  far  the  SNOWTIME  data  analysis 
series.  Plans  call  far  placing  the  ADPAC  status  repart  in  JOVIAL, 

•  The  following  changes  were  prapased  far  JOVIAL: 

Add  carraige  control  option  far  printed  output. 

Expand  features  far  canversian  af  numeric  input/autput  ta  include  signs  and 
decimal  paints. 
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Greater  detail  in  diagnostics.  Too  many  merely  state  that  there  is  an  error 
without  specifying  the  exact  problems. 

HQ  ADC,  ADPAC  SPACE  TRACK  4961 


Computer  programs  are  mostly  in  TAC  (Philco  2000  assembly  language)  at  the  present. 

As  major  changes  are  made  to  the  computer  programs  they  are  being  written  In  JOVIAL. 

The  following  changes  to  JOVIAL  were  Indicated  to  be  highly  desirable: 

•  The  capability  to  overlay  COMPOOL  defined  Items  and  tables  with  program  defined 
items  and  tables. 

•  For  Integer  by  integer  division  the  fractional  bits  should  be  preserved  according 
to  the  resulting  defined  integer. 

•  JOVIAL  I/O  should  Include  the  option  of  having  automatic  conversion  of  numeric 
items,  like  that  In  FORTRAN. 

•  AFM  100-24  should  include  specifications  for  a  standard  JOVIAL  library. 

•  There  should  be  a  JOVIAL  subset  which  Is  more  limited  than  that  of  AFM  100-24. 
The  purpose  being  to  produce  extremely  efficicient  code,  both  core  size  and 
execution  time.  This  Is  needed  for  real  time  systems. 

•  A  traceback  routine  should  be  Included  for  program  error  halts  to  aid  in  determining 
the  cause. 

•  GEN2  diagnostics  should  give  the  line  number. 

•  When  possible  diagnostics  should  indicate  the  specific  column  which  contains  the 
error . 

Other  Comments: 

In  addition  to  the  written  information,  ADPAC  personnel  made  the  following  statements: 

•  It  would  be  desirable  to  have  the  facility  to  apply  the  BYTE  functional  modifier 
to  an  operand  designated  by  the  ENTRY  functional  modifier: 

BYTE  ($3,5$)  (ENTRY(TABLE'NAME,3)) 

•  The  NENT  word  should  be  located  in  some  place  other  than  word  0  of  the  table. 

•  One  ought  to  be  able  to  use  parentheses  instead  of  the  subscript  brackets  ($  and  $). 
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•  It  Is  felt  thot  more  should  be  sold  in  AFM  100-24  about  COMPOOL  and  Librories. 

•  A  Hollerith  constont  form.  -  H(characters)  ought  to  be  provided. 

•  A  focility  for  specifying  ossignment  without  automatic  conversion  should  be 
supplied. 

•  The  FOR  loop  feature  should  be  set  up  in  such  o  way  os  to  provide  for  testing  prior 
to  the  first  Iteration. 

•  "Stringed"  item  declorotions  are  desired: 

ITEM  AA,  BB,  CC  I  48  S  $ 

•  Arrays  with  rows  and  column  lengths  and  dimensions  'variable  at  run  time  would  be 
helpful . 

2.0  CSC 


2.1 

Organizotion: 

Computer  Sciences  Corporotion 
650  N.  Sepulveda 

El  Segundo,  California 

2.2 

Contact: 

Mr.  Terry  Dunbor 

2.3 

Orgonizotion  Identifier: 

CSC 

2.4 

Number  of  JAQ's  Returned: 

1 

2.5 

Dote  of  Interview: 

11  July  1968 

2.6 

JAQ  Response  Notes: 

The  JAQ  returned  contained  no  usage  rotes.  This  is  becouse,  for  the  purposes  of 
this  study,  CSC  wos  considered  only  in  its  role  of  compiler  writer;  the  implementa¬ 
tion  informotion  in  the  returned  JAQ  pertoins  to  o  compiler  produced  by  meons  of 
CSC's  GENESIS  system  for  the  IBM  System  360. 

Compiler  Hardwore  Configurotion: 

IBM  System  360 

Storoge  (Memory)  256K  8  bit  bytes 

Operoting  System: 

Nome:  OS 
Developer:  IBM 

Mode  of  Operoting  System:  Botch  Processing 
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2.7 


Application: 


Not  applicable 


2.8  Interview  Notes: 


Because  CSC  was  being  interviewed  in  the  role  of  compiler  implementor,  the 
usual  interview  format  was  suspended.  Instead,  an  informal  discussion  regarding 
the  implementation  of  features  took  place.  Acknowledgement  is  made  to 
Mr.  Dunbar  for  his  excellent  remarks  in  this  area. 

•  The  standard  as  described  in  AFM  100-24  implies  an  "all  or  nothing"  implementa¬ 
tion  effort.  Implementation  "levels"  or  a  feature  or  function  module  approach 
would  be  preferable. 

•  To  achieve  full  compliance  with  AFM  100-24's  "signed  magnitude"  fixed  point 
number  convention  is  an  extremely  expensive  proposition. 

•  Full  implementation  of  fixed  point  representation  is  very  expensive. 

•  Implementation  of  rounding  is  expensive. 

•  Extended  capabilities  should  be  provided  for  "modelling"  the  computer  memory, 
other  than  simply  the  notion  of  "words".  System  360  has,  in  effect,  four  address¬ 
able  units  (bytes,  half-,  full-,  and  double-word)  and  also  the  notion  of  word 
boundaries,  for  example.  An  extended  memory  modelling  capability  would  probab 
ly  result  in  the  generation  of  more  efficient  object  code. 

•  Standard  JOVIAL  J3  array  presetting  is  inefficient  in  that  array  elements  are 
input  in  an  order  differing  from  the  allocation  order;  and  that  there  is  no  way  for 

•  the  programmer  to  "skip"  over  elements  he  does  not  desire  to  preset. 

•  AFM  100-24  should  be  rewritten.  It  is  overly  cumbersome  for  the  compiler 
implementor;  also  certain  "holes"  exist  in  the  presentation. 

•  In  general,  there  are  too  many  specific  representation  requirements  to  which  the 
implementor  must  adhere.  Frequently,  a  property  of  a  given  machine  will  lend 
itself  to  a  more  economic  representation  than  that  required  in  AFM  100-24. 

In  addition  to  the  above  remarks,  Mr.  Dunbar  has  provided  a  list  of  loop-holes  and 
ambiguities  which  CSC  has  encountered  in  implementing  JOVIAL  compilers  based  on 
AFM  100-24,  This  list  shows  interpretations  which  CSC  has  made  in  order  to  implement 
compilers.  Also  shown  are  certain  comments  regarding  the  JOVIAL  J3  compiler  speci¬ 
fications,  not  included  in  this  study.  DDI  feels  that  this  list  is  very  important  in  that 
it  sheds  light  on  problem  areas  which  only  an  implementor  might  be  expected  to  discover 
For  this  reason,  we  incorporate  the  following  comments  from  CSC  into  this  report. 
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CED-2400  as  a  contractual  document  leaves  much  ta  be  desired  as  there  are  many  areas 
which  are  not  covered  at  all  ar  are  ambiguous.  The  fallowing  is  a  list  af  these  areas 
and  the  interpretation  we  (CSC)  ore  taking.  Also  included  are  exceptions  that  must  be 
taken  because  af  incompatibilities  with  the  hardware.  Each  item  an  the  list  references 
CED-2400  by  section  and  page. 

1)  The  floating  paint  description  has  an  error  in  it;  part  af  a  sentence  is  missing, 
leaving  bath  the  signicand  and  the  exrad  undefined.  We  use  the  hardware  repre¬ 
sentation.  (2416.7;  p.  10) 

2)  Null  literal  constants,  i.e.,  0  H(),  0  T(),  0(),  are  not  defined .  We  define  them 
all  to  be  illegal  .  (2418.5,  .8,  .9;  p  .  11). 

3)  The  sign-magnitude  effect  is  incompatible  with  mast  hardware.  As  filler  bits 
arose  as  a  complement  to  sign-magnitude,  the  compiler  will  ignore  them  and 
treat  the  bit  ta  the  left  af  BIT($  1  $)  as  BIT  ($  0  $)  for  reasons  of  efficient  object 
programs.  (2419.1,  .2,2426.6;  p.  12,16). 

4)  The  precision  and  range  of  index  variables  are  not  defined.  It  should  be  stated 
that  each  implementation  specify  precisely  these  attributes  in  the  farm  af  an 
implied  item  declaration:  ITEM  letter  I  n  S  $.  (2426.5;  p.  16). 

5)  ODD  (variable)  shall  be  interpreted  as  the  rightmost  bit  of  the  variable  (2429; 
p.  17-8). 

6)  Index  computation  should  not  follow  rules  which  differ  from  normal  arithmetic 
computation.  It  is  unreasonable  to  compute  a  floating  constant  +  fixed  variable 
as  fixed.  (2434.6;  p.  20). 

7)  Floating  paint  rounding  is  not  consistent  with  fixed-paint  rounding.  (2434.6;  p.20). 

8)  LOC  af  a  TABLE  is  not  described  clearly  since  it  is  defined  in  terms  of  a  'control 
register'  which  is  undefined.  We  are  defining  LOC  (TABLE)  ta  be  the  address  af 
the  first  word  in  ENTRY  (TABLE  ($  0  $)).  (2434.10,  .11;  p.  20). 

9)  Scaling  formulas  are  not  complete  nar  well  defined.  In  particular  scaling  for 
division  has  a  missing  formula,  i.e.,  IR  far  A/I.  Our  interpretation  changes 
formula  2435 . 1  1  (11)  ta  read  IR=IN+AD+1-MD . ,  thus  deleting  the  qualifying 
clause.  (2435;  p.  21-2). 

10)  As  a  paint  af  interest,  it  should  be  noted  that  mixing  af  literal  formula  types  in 
relational  expressions,  assignments,  I/O,  and  presets  involve  no  conversions. 
(2437.2,  2442.4,  2443,  2447-9,  2470;  p.  23,26-7,  29-31,  45). 

1  1)  Although  ENTRY  variables  are  not  excepted,  they  are  meaningless  as  actual  para¬ 
meters.  (2446.1a.,  .4a.;  p.  28). 
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12) 


Since  “type"  is  referred  to  in  several  contexts  without  a  definition,  it  is  not 
apparent  whether  it  is  up  to  the  programmer  or  the  compiler  to  ensure  parameter 
compatibility.  A  technical  interpretation  of  CED-2400  would  indicate  that 
actual  and  formal  parameters  must  agree,  thus  requiring  no  conversions.  However, 
based  upon  historical  JOVIAL  and  what  we  feel  to  be  the  intent  of  the  author, 
the  compiler  will  generate  code  to  ensure  type  compatibility  for  value  parameters. 
CED-2400  does  not  define  the  distinction  between  the  data  parameters  passed  by 
name  (tables  and  arrays)  used  as  input  parameters  and  those  used  as  output  para¬ 
meters.  We  choose  to  make  no  distinction .  (2446. 7.. 8;  p.  28-9). 

13)  Since  the  manual  is  not  clear  as  to  whether  iteration  means  loop: variable  incre¬ 
mentation  or  iterative  execution  of  the  loop  body,  the  definition  of  a  one:factor: 
forrclause  is  ambiguous.  In  our  compiler  no  iteration  or  looping  will  occur. 

(2455;  p.  33-4). 

14)  Array  presets  should  be  specified  in  allocation  order  and  expanded.  (2467;  p.43). 

15)  Type  matching  for  literal  item  presetting  seems  overly  restrictive.  We  intend  to 
permit  complete  mixing  of  literal  values  with  literal  items.  (2470;  p.  45). 

16)  For  defined  entry  table  Items,  we  will  ignore  the  packing  specifier.  This  inter¬ 
pretation  was  chosen  to  alleviate  the  problem  arising  when  the  specified  alloca¬ 
tion  confl icts  with  the  packing  specifier.  (2474-5;  p.  50-2). 

17)  CED-2400  does  not  define  COMPOOL  resolutions  of  like  table  items.  Given  an 
explicit  COMPOOL  declaration  and  an  implicit  item  declaration  via  a  like  table 
declaration  within  the  source  program,  resolution  will  be  as  follows: 

a)  If  a  reference  to  the  name  occurs  before  the  declaration,  the  COMPOOL 
declaration  is  used  and  a  duplicate  declaration  exists. 

b)  If  the  like  table  declaration  occurs  before  the  reference,  the  implied 
declaration  holds.  (2476;  p.  53). 

18)  Our  interpretation  of  CED-2400  is  that  the  manual  precludes  the  use  of  optional 
origins.  (2479,  2487;  p.  55,60). 

19)  The  index  switch  list  syntax  permits  at  most  2  consecutive  null  switch  points.  We 
feel  this  Is  an  error  and  not  the  intent  of  the  author.  The  compiler  will  not  restrict 
the  number  consecutive  null  switch  points  except  to  the  maximum  switch  points. 
(2481.1;  p.  56). 

20)  Since  the  constants  of  an  item  switch  list  must  be  possible  values  of  the  switch 
item,  we  interpret  CED-2400  to  mean  that  no  conversions  will  be  necessary. 
(2482.1,. 4;  p.  56). 

Although  it  is  not  excepted  by  the  manual,  we  will  not  permit  presetting  formal 
parameters  or  a  function  result  item.  (2484-5;  p.  57-9). 
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21) 


22)  An  "is"  is  interpreted  as  an  "it".  (2484.9;  p.  58). 


23)  CED-2400  refers  to  a  name  before  START;  we  interpret  this  to  mean  only  the  case 

of  a  compile  above  CLOSE  .  (2487.16.,  2489.3) 

in  addition  the  following  exceptions  are  taken  to  Part  1  of  CED-2400  on  compiler 

specifications. 

1)  All  mention  of  library,  procedure  library  and  library  maintenance  programs  should 
be  taken  in  light  of  the  fact  that  the  standard  computer  manufacturer's  operating 
system,  library  and  library  maintenance  will  be  used. 

2)  Sequence  numbers  will  not  be  assigned  to  statements  as  described;  instead  card 
numbers  will  be  used  for  error  reporting.  (3.2. 1  .8;  p.  69) 

3)  The  compiler  will  not  produce  stand-alone  programs.  (3.2.4;  p.  70). 

4)  Control  input  will  obey  computer  operating  system,  not  JOVIAL,  conventions. 

(3.2.5;  p.  70). 

5)  Error  detection,  reporting,  and  correction  will  not  be  as  described  in  CED-2400. 

Error  messages  referencing  card  numbers  will  be  output  rather  than  error  numbers. 

Not  reporting  errors  caused  by  a  previous  error  is  not  always  possible.  Calls  to 
an  error  monitor  procedure  will  not  be  generated.  (3.2.6;  p.  70-1). 

6)  Equipment,  operator,  and  monitor  -  error  checking  will  be  performed  by  and  obey 
computer  operating  system  conventions. 

7)  Compiler  capacities  and  efficiency  will  be  as  described  in  the  contract  (3.2.9, 

3.2.10;  p.  71-2). 

8)  Debug  aids  (listings)  will  not  necessarily  be  as  described  in  CED-2400.  Alter  update 
will  be  performed  by  standard  computer  operating  system  routines.  (3.2.11;  p.72-4). 

9)  COMPOOL  will  not  conform  exactly  to  the  specifications  In  CED-2400.  Arrays  will 

be  permitted  in  the  COMPOOL.  COMPOOL  addresses  will  be  determined  by  the  stand¬ 
ard  compiler  algorithms  and  will  be  relocatable.  There  will  be  no  COMPOOL 
disassembly  program  as  such.  A  storage  map  will  be  produced,  optionally,  as 
part  of  the  assembly  process. 

10)  Documentation  and  quality  assurance  will  be  as  specified  in  the  contract  (3 .5,4. ;p  .75-79). 
3.0  FAA 
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3.1 

Organization: 

FAA 

800  Independence  Avenue,  S.W. 
Washington,  D.C. 

3.2 

Contact: 

Mr.  Donald  Scheffler 

3.3 

Organization  Identifier: 

FAA 

3.4 

Number  of  JAQ's  Returned: 

1 

3.5 

Date  of  Interview: 

9  May  1968 

3.6 

JAQ  Response  Notes: 

•  Application  name:  Not  given 

•  Application  description:  Not  given 

NOTE:  It  was  learned  at  interview  that  the  chief  use  of  JOVIAL  in  the  FAA  is  in 
the  National  Air  Space  Program. 

3.7 

Application: 

Hardware  Configuration: 

Computer  manufacturer  and  model  IBM  7090 

High  speed  memory  storage  32K  words 

Size 

Word  size  if  applicable 

Input/Output  devices 
Drum 

Manufacturer  and  model  None 

Storage  capacity 

Quantity  on  this  configuration 

Disc 

Manufacturer  and  model  None 

Storage  capacity 

Quantity  on  this  configuration 

Magnetic  tapes 

Manufacturer  and  model 
Recording  densities  permitted 
Quantity  on  this  configuration 
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Card  punches 

Manufocturer  and  model 

Card  punch  speed 

Quantity  on  this  configurotion 

Card  reoder 

Monufocturer  ond  model 

Card  reod  speed 

Quantity  on  this  configuration 

Printer 

Manufacturer  and  model 
Printer  speed 

Quontity  on  this  configurotion 

Paper  tape  reader 

Manufacturer  and  model 

Tape  read  speed 

Quantity  on  this  configuration 

Paper  tape  punch 

Manufacturer  and  model 

Tape  punch  speed 

Quantity  on  this  configurotion 

Operating  System: 

Nome:  FORTRAN  Monitor  System 
Developer:  IBM 

Mode  of  Operation:  Botch  processing 
Background: 

•  JOVIAL  was  used  because  it  was  regorded  as  ine  language  best  suited  for  the  project. 

•  Average  yeors  experience  of  programmers:  5 

•  Average  yeors  JOVIAL  experience:  2 

•  Dialect  used:  JOVIAL  J2 

•  Compilation  speed:  Unknown 

•  Compiled  code:  Not  relocatable  , 

Totol  Number  of  JOVIAL  Stotements:  Not  given. 

NOTE:  No  counts  or  estimates  of  usages  were  given  in  the  JAQ  returned.  Qualitative 
phrases  were  used  instead.  We  have  quantified  these  phrases,  as  shown  below: 
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Occasionally  .2 

Frequently  .8 

Almost  Always  .9 

Never  0 

Generally  .5 

Constantly  .9 

Always  .9 

None  0 

Not  Available  0 

Rarely  .  1 

Infrequently  .2 

Continually  .9 


3.8  Interview  Notes: 


FAA  feels  it  would  be  desirable  to  allow:  IF  AA  EQ  BB,CC,DD  . . . 
for  IF  AA  EQ  BB  OR  AA  EO  CC  OR  AA  EQ  DD 

4.0  FOCCPAC 

4.1  Organization: 


4.2  Contact: 


4.3  Organization  Identifier: 

4.4  Number  of  JAO*s  Returned: 

4.5  Date  of  Interview: 


4.6  JAO  Response  Notes: 

Each  of  the  two  JAQ's  returned  contains  responses  for  two  distinct  sub-applications. 
These  are  identified  by  FOCC-1  and  FOCC-2.  Both  run  on  the  same  computer  and 
use  the  same  compiler.  Compliance  information  was  taken  from  the  JAO  for  FOCC-1  . 

4.7  Application: 

(1)  Sub-application  FOCC-1 

Sub-application  Name:  Patrol  Report  —  NAVCOSSACT 

Report  0193  1 1P027 


FOCCPAC 
U.S.  Navy 
Honolulu,  Hawaii 

Capt.  Bishop 

FOCC 

2 

22  May  1968 
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Sub-opplicotion  Description: 


The  purpose  of  the  sub-application  is  to  maintoin  a  history  of  data  pertaining  to  the 
operotions  of  Poloris  Submorines  ond  upon  request  to  evoluote  this  dato. 


Totol  Number  of  JOVIAL  Stotements:  13,388 
Sub-applicotion  Hardwore  Configurotion: 


Computer  manufocturer  and  model 


High  speed  memory  storage 
Size 

Word  size  if  applicable  12 

Input/Output  devices 
Drum 

Manufocturer  and  model 
Storage  copacity 
Quantity  on  this  configuration 

Disc 

Manufacturer  ond  model 
Storage  capacity 
Quontity  on  this  configuration 

Mognetic  topes 

Monufocturer  ond  model 
Recording  densities  permitted 
Quontity  on  this  configuration 

Cord  punches 

Manufacturer  ond  model 
Card  punch  speed 
Quantity  on  this  configuration  o 


Control  Dato  Corporation  1604A  &  160A 

160A  1604A 

16K(4  banks)  82K  words 

2/word(2  banks-  8/word  six  bit  bytes 

160A;  2  banks-169 
core  storoqe  only) 

48  bits 


None 


1301  IBM 

28X10^  six  bit  bytes 


729  IV  IBM 
556  bits/in 
800 

1402  IBM 
250  cards/min 

this  type 


Card  reader 

Manufocturer  ond  model 

Cord  reod  speed 

Quontity  on  this  configurotion 


1402  IBM 
600  cards/min 
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Printer 


Manufocturer  and  model 
Printer  speed 

Quontity  on  this  configuration 


Poper  tope  reoder 

Manufocturer  and  model 

Tape  reod  speed 

Quontity  on  this  configurotion 


Control  Dota  350 
350  fromes/sec 


Paper  tope  punch 

Monufocturer  ond  model 
Tope  punch  speed 
Quantity  on  this  configurotion 


Teletype  BRPE  1 1 
1 1 0  frames/sec 


Operoting  System: 

Name:  MESIM 
Developer:  NAVCOSSACT 
Mode  of  operotion:  "UNIT" 

NOTE:  With  the  exception  of  compilations,  ol!  programs  are  run  individually, 
eoch  being  monuolly  loaded  , 

Bockground: 

•  JOVIAL  was  used  becouse  it  wos  considered  the  longuoge  best  suited  for  the  project. 

•  Average  years  experience  of  progrommers:  4 

•  Average  yeors  JOVIAL  experience:  1 

•  Compilotion  speed:  210  stotements  per  minute 

•  Compiled  code:  Optionally  relocotable 


(2)  Sub-appI icotion  FOCC-2 


Sub-oppI ication  Name:  Afloat  Cost,  Consumption,  Effectiveness  Surveillonce  System 


Sub-opplicotion  Description: 


The  purpose  of  the  sub-application  is  to  collect  and  summarize  basic  financial  consumption 
data  generated  in  the  normol  course  of  supply  operotions  afloat. 


Totol  Number  of  JOVIAL  Statements:  450 


Sub-oppI  ication  Hordware  Configurotion;  See  under  FOCC-1  . 
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Operating  System: 


Name:  Subsystem  Executive 

Developer:  Nat  given 

Mode  of  operotion:  Botch  processing, 

Bockground: 


•  JOVIAL  was  used  becouse  it  was  the  only  high-level  longuage  available. 

•  Average  yeors  experience  af  programmers:  2 
©  Averoge  yeors  JOVIAL  experience:  2 

©  Dialect  used:  JOVIAL  J3 

•  Compilatian  speed:  Nat  given 

e  Campiled  code:  Relocatable, 

4.8  Interview  Nates: 


The  job  af  the  FOCCPAC  persannel  is  ta  maintain  pragrams  written  by  NAVCOSSACT 
and  NAVCOSSACT  contractors.  The  desire  was  expressed  far  mare  campiler 
directives  or  other  mechanisms  which  wauld  allow  the  programmer  to  effect  a  mare 
efficient  code  generation, 

5.0  HAM 

5.1  Organization:  Operational  Progrom  Maintenance  Branch 

4th  Air  Farce  Combat  Center 
Hamilton  A  .  F  .B  . 

San  Francisco,  California 


5.2 

Contact: 

Lt.  Ruck 

5.3 

Organization  Identifier: 

HAM 

5.4 

Number  af  JAQ's  Returned: 

1 

5.5 

Date  of  Interview: 

23  May  1968 

5.6 

JAO  Response  Notes: 

- 

5.7 

AppI  icatlan: 

Application  Description: 

The  application,  WNR-CC,  functions  ta  monitor  coordinate  and  direct  air  defense 
operations  far  WNR  and  coordinate  air  defense  with  adjacent  regions. 
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Total  Number  JOVIAL  Statements:  8850 


Application  Hardware  Configuration: 


Computer  manufacturer  and  model  Burroughs  AN/GSA51 

High  speed  memory  storage 
Size 

Word  size  if  applicable 

Input/Output  devices 
Drum 

Manufacturer  and  model 

Storage  capacity 

Quantity  an  this  configuration 


Disc 

Manufacturer  and  model 

Storage  capacity 

Quantity  an  this  configuration 

Magnetic  tapes 

Manufacturer  and  model 
Recording  densities  permitted 
Quantity  an  this  configuration 

Card  punches 

Manufacturer  and  model 
Card  punch  speed 

Quantity  on  this  configuration  an  this  type 
Card  reader 

Manufacturer  and  model 

Card  read  speed 

Quantity  an  this  configuration 

Printer 

Manufacturer  and  model 
Printer  speed 

Quantity  an  this  configuration 

Paper  tape  reader 

Manufacturer  and  model 

Tape  read  speed 

Quantity  on  this  configuration 


60, 0000  wards 
10, 000  six  bit  bytes 
48  bits 


Burroughs  MU-469/GYK-4 
65,536]q  48  bit  wards  each 
2  each 


None 


Burroughs  AN/GSH-12 
800  bits/in 
3  each 

IBM  026 
1  each 

Burroughs  AN/GSQ72 
200  cards/min 
1  each 
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Paper  tape  punch 

Manufacturer  and  model 

Tape  punch  speed 

Quantity  on  this  configuration 

Flexowriter  -  AN/GYQ-2 

Controller  Comparator  -  2  l/O  Modules  C4634/GYK-4 
Controller  Comparator/Message  Progresser 
1  I/O  Module  1  msg.  Processor  C4635/GYK-4 

Operating  System: 

Name:  Western  NORAD  Region  CC 
Developer:  USAF/SDC 
Mode  of  Operation:  Real  Time 

Background:  No  background  information  supplied 

5.8  Interview  Notes:  SDC  is  primarily  responsible  for  the  design  of  the  HAM  system. 
6.0  NAVCOSSACT 

6.1  Organization:  NAVCOSSACT 

Washington  Naval  Yard  Annex 
Washington,  D.C. 


6.2 

Contact: 

Mr .  Dan  Foster 

6.3 

Organization  Identifier: 

NAVC 

6.4 

Number  of  JAQ's  Returned: 

3 

6.5 

Date  of  Interview: 

8  May  1968 

6.6 

JAQ  Response  Notes: 

• 

Each  of  the  three  JAQ's  returned  contains  response  data  for  distinct  sub-applications. 
These  are  identified  by  NAVC-1,  NAVC-2,  and  NAVC-3. 

• 

It  is  our  understanding  that  each 
is  used  for  each.  Compliance  in 

runs  on  the  CDC  1604  and  that  the  same  compiler 
formation  was  obtained  from  the  JAQ  for  NAVC-1  . 

6.7 

AppI  ication: 

(1)  Sub-application  NAVC-1: 


Sub-applicotion  Nome:  JOVIAL  Compiler 


Sub-application  Description: 

The  purpose  of  this  sub-opplicotion  is  to  compile  progroms  written  in  JOVIAL  for 
use  on  the  CDC  160/1604  computer  complex. 

Total  Number  of  JOVIAL  Stotements:  Not  given 

NOTE:  No  counts  or  estimotes  of  feotures  were  provided  in  the  JAQ  . 


Sub-application  Hardwore  Configurotion: 
Computer  manufocturer  and  model  CDC- 1604 


High  speed  memory  storage 
Size 

Word  size  if  opplicable 

Input/Output  devices 
Drum 

Monufocturer  ond  model 

Storoge  copacity 

Quontity  on  this  configuration 

Disc 

Manufacturer  and  model 

Storage  capacity 

Quantity  on  this  configuration 

Magnetic  topes 

Monufocturer  and  model 
Recording  densities  permitted 
Quontity  on  this  configurotion 

Card  punches 

Manufacturer  and  model 

Card  punch  speed 

Quantity  on  this  configurotion  of 

Monufocturer  ond  model 

Card  punch  speed 

Quantity  on  this  configurotion  of 


32,768  words 
8  six  bit  bytes 
48  bits 


IBM  1301 

28,000,000^  six  bit  byte 
4 


IBM  729 
556  bits/in 
22 


IBM  1402 
250  cards/min 
his  type  2 

IBM  1402 
800  cords/min 
this  type  2 


Cord  reader 

Manufacturer  and  model 

Card  read  speed 

Quantity  on  this  configurotion 


Burroughs  B-122 
250  cards/min 
1 
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Printer 

Manufacturer  and  model 
Printer  speed 

Quantity  on  this  configuration 
Printer 

Manufacturer  and  model 
Printer  speed 

Quantity  an  this  configuration 

Paper  tape  reader 

Manufacturer  and  model 

Tape  read  speed 

Quantity  on  this  configuration 

Paper  tape  reader 

Manufacturer  and  model 

Tape  read  speed 

Quantity  an  this  configuration 

Paper  tape  punch 

Manufacturer  and  model 

Tape  punch  speed 

Quantity  on  this  configuration 

Operating  System: 

Name:  AN  FYK-l(V)  1604A  OPCON 
Developer:  Auerbach  Corporation 
Made  of  Operation:  Batch  processing 

Background: 

•  JOVIAL  was  used  because  it  was  the  official  NAVY 

•  Average  years  experience  of  programmers:  3 

o  Average  years  JOVIAL  experience:  3 

o  Dialect  used:  JOVIAL  J3 

•  Compilation  speed:  Nat  given, 

o  Compiled  code:  Relocatable. 

(2)  Sub-appI icatian  NAVC-2: 

Sub-application  Name:  None  given 


Halley 

150  lines/min 

1 


CDC 

1000  lines/min 

2 


CDC 

350  frames/sec 
3 


CDC 

350  frames/sec 

2 


Teletype  BRPE  1 1 
1 10  frames/sec 
5 


language , 


Sub-application  Description:  Compiler  Maintenance  Activity 


Total  Number  of  JOVIAL  Statements;  Not  given 


Sub-application  Hardware  Configuration:  See  under  NAVC-1 


Operating  System:  No  information  given. 


Background: 

•  JOVIAL  was  used  in  order  to  remain  compatible  with  related  projects  and 
because  it  was  the  best  suited  language  for  the  project, 

•  No  further  background  information  was  given, 

(3)  Sub-application  NAVC-3 

Sub-application  Name:  Route  generation/Map  generation  (RGMG) 

Sub-application  Description: 

Given  a  latitude  and  longitude,  the  sub-application  RGMG  generates  a  binary  map  of 
the  world  or  a  sea  route  (land-mass  avoidance)  according  to  input  specifications.  The 
binary  map  must  reside  in  core  before  a  route  of  turning  points  can  be  generated, 
RGMG  is  compiled  as  a  closed  subroutine  and  is  operational  as  a  part  of  a  larger  sea 
surveillance  system.  In  addition  it  can  be  run  independently  and  has  been  run  using 
the  PPS  Test  function  to  take  advantage  of  the  recording  capability  (RGMG  does  not 
write  out  the  results). 

Total  Number  of  JOVIAL  Statements:  2903 
Sub-application  Hardware  Configuration:  See  under  NAVC-1 


Operating  System:  See  under  NAVC-1 


Background: 

•  JOVIAL  was  used  to  remain  compatible  with  other  related  projects, 

•  Average  years  experience  of  programmers:  0 

•  Average  years  JOVIAL  Experience:  0 

•  Dialect  used:  JOVIAL  J3 

•  Compiler  speed:  Not  given 

•  Compiled  Code:  Not  relocatable 

6,8  Interview  Notes: 

•  It  was  stressed  that  the  major  consideration  In  the  use  of  JOVIAL  is  the  ease  of 
programming  it  provides. 
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• 

NAVCOSSACT  feels  that  the 
(e.g.,  item  declarations)  cou 

readibility  of  JOVIAL  code  in  certain  areas 
Id  stand  some  improvement. 

7.0 

NCDCF 

7.1 

Organization: 

National  Civilian  Defense  Computer  Faci 
OIney,  Maryland 

7.2 

Contact: 

Mr.  Marvie  Lee 

7.3 

Organization  Identifier: 

NCDCF 

7.4 

Number  of  JAQ's  Returned; 

1 

7.5 

Date  of  Interview: 

7  May  1968 

7.6 

JAQ  Response  Notes: 

7.7 

AppI  ication: 

Application  Description: 

The  Dash  Executive  control  system  assists  in  using  and  monitoring  the  execution  of 
a  system  of  JOVIAL  programs. 

Total  Number  of  JOVIAL  Statements:  1600 


Application  Hardware  Configuration: 


Computer  manufacturer  and  model  CDC  3600 

High  speed  memory  storage  65536  words 

Size 

Word  size  if  applicable  48  bits 

Operating  System: 

Name:  SCOPE 
Developer:  CDC 

Mode  of  Operation:  Batch  Processing. 

Background: 

•  JOVIAL  was  used  to  maintain  source  language  compatibility  with  related  projects. 

•  Average  years  experience  of  programmers:  4 

•  Average  years  JOVIAL  experience:  1 
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• 

Dialect  used;  JOVIAL  J3 

• 

Compilation  speed:  Not  given 

• 

Compiled  code:  Not  given 

7.8 

Interview  Notes: 

• 

NCDCF  personnel  interviewed 
JOVIAL  compiler. 

are  primarily  responsible  for  maintaining  a 

• 

An  opinion  was  expressed  that 
NC DCF's  application. 

list  processing  facilities  might  find  some  use 

o 

• 

00 

NEL 

8.1 

Organization: 

Naval  Electronics  Laboratory 

Command  and  Control  Facility 

San  Diego,  California 

csi 

00 

Contact: 

Mr.  Barksdale 

8.3 

Organization  Identifier: 

NEL 

00 

Number  of  JAQ's  Returned: 

1 

8.5 

Date  of  Interview: 

24  April  1968 

8.6 

JAQ  Response  Notes: 

8.7 

Application: 

Application  Description: 

The  purpose  of  the  Navy  Command  and  Control  application  is  to  maintain  and  test 
compilers. 

Total  Number  of  JOVIAL  Statements:  20K 

Application  Hardware  Configuration: 

Computer  manufacturer  and  model  UN  I  VAC  CP  667 

High  speed  memory  storage  131K  words 

Size  6  six  bit  bytes 

Word  size  if  applicable  36  bits 

Input/Output  devices 
Drum 
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Manufacturer  and  model 
Storage  capacity 

Quantity  on  this  configuration 


Univac  Fastran 
132X1C^  six  bit  bytes 
702x106  bits 

1 


Magnetic  tapes 

Manufacturer  and  model 
Recording  densities  permitted 

Quantity  on  this  configuration 


CDC  603‘s  &  606’s 
200  bits/in 
556  bits/in 
8 


Card  reader 

Manufacturer  and  model 

Card  read  speed 

Quantity  on  this  configuration 


Univac  1449 
100  cards/min 
1 


Paper  tape  reader 

Manufacturer  and  model 

Tape  read  speed 

Quantity  on  this  configuration 

Paper  tape  punch 

Manufacturer  and  model 

Tape  punch  speed 

Quantity  on  this  configuration 

Operating  System: 

Name:  JOVIAL 

Developer:  PRC  and  NELC 

Mode  of  operation:  Batch  processing 


Univac  1232 
350  frames/sec 
1 


Univac  1232 
150  frames/sec 
1 


Background: 

•  JOVIAL  was  used  because  it  was  regarded  as  the  best  suited  language  for  the  project. 

•  Average  years  experience  of  programmers:  5 

•  Average  years  JOVIAL  experience:  1 

•  Dialect  used:  JOVIAL  J3 

•  Compilation  speed:  300-500  statements/minute 

e  Compiled  code:  Relocatable 

8.8  Interview  Notes: 


It  is  the  intent  of  the  Navy  that  the  following  philosophy  be  employed  in  the 
design  and  implementation  of  Command  &  Control  systems:  A  clear  separation  of 
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functional  software  from  (machine)  system  support  software  Is  to  be  maintained. 

This  means  that  NEL  would  prefer  a  language  as  machine  independent  as  possible. 
The  discussion  also  produced  the  counter  idea  -  the  essential  strong  point  of 
JOVIAL,  as  far  as  NEL  is  concerned,  is  the  set  of  machine  dependent  features 
it  contains.  It  was  suggested  that  a  possible  resolution  of  these  two  conflicting 
notions  would  lie  in  a  kind  of  (COBOL-like)  "Environment  Division".  The  Navy 
wants  to  be  able  to  transfer  programs  between  computers;  in  other  words  the 
functions  performed  by  a  given  application  may  have  to  be  executed  on  a  variety 
of  different  machines. 

•  JOVIAL  is  too  verbose.  It  would  be  desirable  to  have  "compound"  Item  declara¬ 
tions,  for  example  (ITEM  AA  I  48  S  BB  I  48  S,  etc.) 

•  NEL  would  (and  does)  like  to  make  use  of  an  expanded  character  set.  They  use 
braces  for  BEGIN  END.  This  helps  attack  the  verbosity  problems. 

•  It  was  suggested  that  a  "TYPE  OTHER"  (CDC  FORTRAN  63)  facility  be  considered. 
9.0  NMCSSC 

9.1  Organization:  DCA 

National  Military  Command 
System  Support  Center 
Pentagon 

Washington,  D.C. 


9.2 

Contact: 

Colonel  Gollentine 

9.3 

Organization  Identifier: 

NMCSSC 

9.4 

Number  of  JAQ's  Returned: 

1 

9.5 

Date  of  Interview: 

20  June  1968 

9.6 

JAQ  Response  Notes: 

9.7 

Application: 

Application  Description: 

The  Damage  and  Contamination  Model  associates  military  nuclear  weapons  against  all 
kinds  of  targets  and  predicts  damage.  The  pertinent  parameters  are  coordinates,  wind 
data,  height  of  weapon  burst,  weapon  yield,  vulnerability,  number  of  targets,  and 
target  capacity. 

Total  Number  of  JOVIAL  Statements:  5000 


no 


Application  Hardware  Configuration; 


High  speed  memory  storage 
Size 

Word  size  if  applicable 

Input/Output  devices 
Drum 

Manufacturer  and  model 

Storage  capacity 

Quantity  on  this  configuration 


Disc 

Manufacturer  and  model 

Storage  capacity 

Quantity  on  this  configuration 

Magnetic  tapes 

Manufacturer  and  model 
Recording  densities  permitted 
Quantity  on  this  configuration 

Card  punches 

Manufacturer  and  model 
Card  punch  speed 

Quantity  on  this  configuration  of  this  type 

• 

Card  reader 

Manufacturer  and  model 

Card  read  speed 

Quantity  on  this  configuration 

Printer 

Manufacturer  and  model 
Printer  speed 

Quantity  on  this  configuration 

Paper  tape  reader 

Manufacturer  and  model 

Tape  read  speed 

Quantity  on  this  configuration 

Paper  tape  punch 

Manufacturer  and  model 
Tape  punch  speed 
Quantity  on  this  configuration 


32K  words 
8  six  bit  bytes 
48  bits 


None 


None 


CDC  606 
500  bits/in 
12 


IBM 

50  cards/min 

1 


CPC  405 

1200  cards/min 

1 


CDC  501 
1000  I  ines/min 
1 


CDC 

1 

CDC 

1 


Operating  System: 


Name:  COOP 
Developer:  CDC 

Mode  of  Operation:  Batch  Processing 


Background: 

•  JOVIAL  was  used  in  order  to  stay  compatible  with  other  projects  and  because  it 
was  the  language  best  suited  for  the  project, 

•  Average  years  experience  of  programmers:  2 

•  Average  years  JOVIAL  experience:  1 

•  Dialect  used:  JOVIAL  J3 

•  Compilation  speed:  44  statements  per  minute 

•  Compiled  Code:  CODAP  symbolic  which  is  then  assembled  in  a  relocatable  fashion. 

9.8  Interview  Notes: 

•  A  desire  was  expressed  to  have  the  compiler  produce  code  in  the  form  of  the 
assembly  languages  supplied  by  the  computer  manufacturer;  also,  the  subroutine 
linkages  of  the  language  should  be  in  such  a  form  as  to  be  compatible  with  the 
computer  manufacturer's  system. 

•  NMCSSC  also  requires  the  ability  to  process  machine  interrupts. 

10.0  NHCP 


10.1  Organization: 

10.2  Contact: 

10.3  Organization  Identifier: 

10.4  Number  of  JAQ's  returned: 

10.5  Date  of  Interview; 

10.6  JAQ  Response  Notes: 

The  JAQ's  returned  were  not  received 


Headquarters  NORAD 
NHCP 

Ent  Air  Force  Base 
Colorado  Springs,  Colorado 

Mr.  N .  R.  Gerhart 

NHCP 

2* 


in  sufficient  time  for  their  contents  to  be  processed. 


10.7  Application: 


10,8  Interview  Notes: 


•  NHCP  desires  facilities  for  tables  containing  variable  length  entries. 

•  Multiple  assignment  statements  of  the  form 
AA  =  BB  =  CC  =  0$ 

would  be  found  useful.  The  effect  of  the  above  statement  is  produced  by 
AA  =  0$ 

BB  =  0$ 

CC  =  0$ 

«  A  need  for  a  ’^Dro-word"  such  as  "SELF"  or  "*"  was  voiced. 

VARIABLE  =  I  SELF}  +3$  or  VARIABLE  =  *  +  3  $ 

prcxJuces  the  effect 
VARIABLE  =  VARIABLE  +  3  $ 

•  Extended  use  of  ranged  subscripts  would  be  helpful: 

TABLE-NAME  (  $  3  .  .  .  12  $  ) 

has  the  effect  of  naming  a  table  structure  made  up  of  entries  3  through  12. 

•  NHCP  would  like  the  ability  to  show  a  set  of  loop  variable  increment  values  to 
be  taken  in  FOR  loop  processing: 

FOR  I  =  1,  (5,  3,  6,  19  ),  NN 

Each  lime  through  the  increment  handling  part  of  the  loop,  the  next  increment 
“to  the  right"  in  the  list  is  used. 

•  NHCP  would  prefer  the  use  of  parentheses  instead  of  the  JOVIAL  index  brackets 
($  and  $)  when  writing  subscripts, 

•  A  desire  to  include  $  in  comments  was  mentioned . 

e  NHCP  feels  that  non-named  variables  should  be  allowed  as  operands  of  the  BIT 
and  BYTE  functional  modifier,  e.g., 

BIT($  3,  6  $)  (BYTE  ($5,  2$)  (AA)) 

11.0  RADC 


11.1 

Organization: 

Rome  Air  Development  Center,  EMIIF 
Griffis  Air  Force  Base 

Rome,  New  York 

11.2 

Contact: 

Mr.  Dick  Motto 

11.3 

Organization  Identifier; 

RADC 

11.4 

Number  of  JAQ's  Returned: 

4 

11.5 

Date  of  Interview: 

1  May  1968 

11.6 

JAQ  Response  Notes: 
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Eoch  of  the  three  JAQ's  returned  contains  response  doto  for  three  distinct  sub-applications. 
These  are  identified  as  RADC-2,  RADC-3,  ond  RADC-4, 

•  The  JAQ  returned  by  RADC-1  did  not  give  usoge  counts. 

•  RADC-1  is  run  on  the  CDC  1604B. 

•  RADC-2  is  run  on  the  Univoc  M555. 

•  RADC-3  is  run  on  the  GE  635. 

•  RADC-4  is  run  on  the  GE  635. 

•  It  is  our  understonding  thot  RADC-3  ond  RADC-4  use  the  some  compiler. 

11.7  Applicotion: 

(1)  Sub-applicotion  RADC-1 
Sub-opplicotion  Name:  None  given. 

Sub-opplicotion  Description: 

•  AAADAPS  -  o  dato  monogement  system 

•  TINT  -  an  on-line  JOVIAL  (subset)  compiler 

•  JOVIAL  COMPILER 

•  AUERBACH  PROGRAM 

Totol  Number  JOVIAL  Statements:  Not  given. 

NOTE;  No  counts  or  estimotes  of  usoge  were  entered  in  this  JAQ. 

Sub-application  Hordwore  Configuration:  Not  given. 


Operoting  System;  No  information  given. 

Background:  No  information  given. 

(2)  Sub-applicotion  RADC-2 

Sub-opplicotion  Nome:  Doto  Monogement  I 

Sub-opplicotion  Description: 

Dota  Monogement  I  is  o  dota  monogement  system. 

Totol  Number  of  JOVIAL  Stotements:  Not  given. 

NOTE:  It  wos  stated  in  the  JAQ  for  RADC-2  thot  because  the  compiler  is  In  o  continuous 
stote  of  flux  and  improvement,  ond  since  no  mojor  progroms  hove  yet  been  written,  usoge 
counts  hove  not  been  entered.  Rather,  qualitative  stotements  have  been  made  regording 
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usage  rates  (e.g.,  very  frequently,  seldom,  etc.)  We  have  quantified  these  statements. 
The  following  is  a  list  of  the  qualitative  statements  used  with  their  associated  quantifiers: 


OFTEN 

.7 

VERY  FREQUENTLY 

.9 

SOME 

.3 

SELDOM 

,2 

SOMETIMES 

.2 

ALWAYS 

.9 

NEVER 

0 

VERY  SELDOM 

.1 

VERY  OFTEN 

.9 

FREQUENTLY 

.7 

Sub-application  Hardware  Configuration: 


Computer  manufacturer  and  model:  Univac  M555 


High  speed  memory  storage 

64K  words 

Word  size: 

1  8  bits 

Operating  System: 

Name  of  operating  system: 

ECP  IT 

Developer: 

Not  given 

Mode  of  operation: 

Not  given 

Background: 

•  JOVIAL  was  used  in  this  project  both  because  it  was  the  official  Air  Force 
language  and  because  it  was  the  language  best  suited  for  the  project. 

•  No  other  background  information  was  entered. 

(3)  Sub-application  RADC-3 

Sub-application  Name:  TINT 

Sub-application  Description:  "On-line  compiler" 

Total  Number  of  JOVIAL  Statements:  9142 
Sub-Application  Hardware  Configuration: 

Computer  manufacturer  and  model  GE  635 
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High  speed  memory  storage 

Size 

Word  size  if  applicable 

128K  words 

36  bits 

Input/Output  devices 

Drum 

Manufacturer  and  model 

Storage  capacity 

Quantity  on  this  configuration 

GS  MDS  200 

30M  bits 

1 

Disc 

Manufacturer  and  model 

Storage  capacity 

Quantity  on  this  configuration 

GS  DSU  200 

138M  bits 

2 

Magnetic  tapes 

Manufacturer  and  model 

Recording  densities  permitted 

Quantity  on  this  configuration 

GS  MT  *67 

200/566/800  bifs/in 

8 

Card  punches 

Manufacturer  and  model 

Card  punch  speed 

Quantity  on  this  configuration  of  this  type 

GE  4WCPZ201A1 

300  cards/min 

1 

Card  reader 

Manufacturer  and  model 

Card  read  speed 

Quantity  on  this  configuration 

GS  4WCRZ201A1 

800-1000  cards/min 

Printer 

Manufacturer  and  model 

Printer  speed 

Quantity  on  this  configuration 

GE  PRT  200 

1200  lines/min 

2 

Qperating  System: 

Name:  GECQS 

Developer:  General  Electric  Co. 

Mode  of  Qperating  System:  Batch  processing 

Background: 

•  JOVIAL  was  used  because  It  was  the  official  Air  Force  language,  because  it  was 

desired  to  maintain  source  language  compatibility  with  other  projects,  and 
because  it  was  the  best  suited  language  for  the  project. 
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•  Averoge  yeors  experience  of  progrommers:  3-5 

o  Averoge  yeors  JOVIAL  experience:  3-5 

•  Diolect  used:  JOVIAL  J3 

•  Compilotion  speed:  50  stotements  per  minute 

•  Compiled  code:  Relocotoble 

(4)  Sub-opplicotion  RADC-4 

Sub-oppI icotion  Nome:  Auxiliary  Control  Executive  Processor 
Sub-opplicotion  Description:  "Preprocessor  for  on  Executive  Control  Progrom  . 

Totol  Number  of  JOVIAL  Stotements:  395 1 

Sub-opplicotion  Hordwore  Configuration:  No  detoils  given.  It  is  our  understanding, 
however,  thot  the  computer  is  the  GE  635. 

Operating  System:  No  information  given. 


Background: 

•  JOVIAL  was  used  to  mointoin  compotibility  with  other  related  projects,  becouse 
it  is  the  official  Air  Force  longuoge  and  becouse  it  is  the  language  best  suited 
for  the  project. 

•  Averoge  yeors  experience  of  programmers:  4 

•  Averoge  years  JOVIAL  experience:  1 

•  Dialect  used:  JOVIAL  J3 

•  Compilation  speed:  None  given. 

•  Compiled  code:  Relocotoble. 

1 1  .8  Interview  Notes: 


RADC  would  like  the  ability  to  specify  (ot  compile  or  lood  time)  the  ollocotion  sequenc¬ 
ing  of  both  programs  ond  data;  this  is  felt  a  more  importont  facility  thon  dynamic  ollocotion. 


12.0 

SAC 

12.1 

Organization: 

Headquarters  SAC 

Offut  Air  Force  Base,  Nebraska 

12.2 

Contacts: 

Lt  Col  F.L.  Maloy,  DOCODS 
Major  Samuel  P.  Herod 

12.3 

Organization  Identifier: 

SAC 
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12.4 


Number  of  JAQ's  Returned:  4 


12.5  Date  of  Interview:  13  May  1968 

12.6  JAQ  Response  Notes: 

•  Each  of  the  four  JAQ's  returned  contains  response  data  for  four  distinct  sub¬ 
applications.  These  sub-applications  are  identified  as  SAC-1,  SAC-2,  SAC-3, 
and  SAC-4. 

•  Sub-applications  SAC-1,  SAC-2,  and  SAC-3  each  run  on  the  AN/FSQ-31  and 
each  uses  the  same  compiler.  Implementation  responses  for  SAC-1,  SAC-2,  and 
SAC-3  were  taken  from  the  JAQ  for  SAC-1  . 

•  Sub-application  SAC-4  is  run  on  the  IBM  7090;  implementation  responses  are 
taken  from  the  JAQ  for  SAC-4, 

12.7  Application: 

(1)  Sub-application  SAC-1 
Sub-application  Name:  Utility  Subsystem 
Sub-application  Description: 

The  Utility  subsystem  includes  the  following  capabilities: 

•  executive 

•  compiler 

•  tape  update 

•  COMPOOL 

•  data  generator 

•  data  reduction 
o  dump 

•  CHECKER 

o  task  parameter  assembler 

•  tape  maintenance 

•  loader  maintenance 

Total  Number  JOVIAL  Statements:  116,137 

Sub-application  Hardware  Configuration: 


Computer  manufacturer  and  model  IBM  AN/FSQ-31  Data  Processing  Central 


High  speed  memory  storage 
Size 

Word  size  If  applicable 
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65,536  words 
524,288  six  bit  bytes 
48  bits 


Input/Oufpuf  devices 
Drum 

Manufacturer  and  model 
Starage  capacity 

Quantity  an  this  canfiguratian 


19 

IBM  (na  model) 

1 ,  1 14,  1 12  six  bit  bytes 
6,684,672  bits 
2 


Disc 

Manufacturer  and  model 
Storage  capacity 

Quantity  an  this  configuration 


Bryant  Model  L 
103,809,024  six  bit  bytes 
622,854, 144  bits 
1 


Magnetic  tapes 

Manufacturer  and  model 
Recording  densities  permitted 
Quantity  an  this  configuration 

*Card  punches 

Manufacturer  and  model 

Card  punch  speed 

Quantity  an  this  configuration  af 


IBM  729  II,  IBM  729  IV 
200/556  bits/in 
12 


IBM  729  II,  IBM  729  IV 
250  cards/mln 
is  type  1 


*Card  reader 

Manufacturer  and  model 

Card  read  speed 

Quantity  an  this  configuration 


IBM  1402 
800  cards/min 
1 


*Printer 

Manufacturer  and  model 
Printer  speed 

Quantity  an  this  configuration 


IBM  1403 
600  lines/min 
1 


^Available  as  part  af  IBM  1401  systems  which  can  be  used  on-line.  However,  printing 
and  punching  is  normally  accomplished  off-line. 

NOTE:  There  are  two  IBM  AN/FSQ-31  computers.  Each  with  an  I/O  typewriter,  fix 
typewriter.  Disc,  2  drums,  15  tape  drives  and  1401  system. 


Operating  System: 

Name:  EXECUTIVE 

De  ve  I  aper:  S  DC/U  SA  F 

Mode  af  operation;  Batch  processing 

Real  Time 

NOTE:  "The  utility  subsystem  operates  only  in  the  batch  processing  made.  However, 
it  can  operate  ’interleaved'  with  the  real  time  programs." 
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Background: 


•  JOVIAL  was  used  both  to  maintain  source  language  compatibility  with  other 
related  projects  and  because  it  was  the  language  best  suited  for  the  project. 

Also  stated:  "JOVIAL  was  devised  for  SACCS  system  by  SDC  -  who  wrote  the 
utility  subsystem . " 

•  Average  years  experience  of  programmers:  "Unknown" 

•  Average  years  JOVIAL  experience:  "Unknown  -  perhaps  about  2" 

•  Dialect  used:  JOVIAL  J2 

•  Compilation  speed:  200  statements  per  minute 

•  Compiled  code:  Relocatable 

(2)  Sub-application  SAC-2 
Sub-application  Name:  Planning 
Sub-application  Description: 

The  Planning  Branch  furnishes  the  automated  support  for  development  and  maintenance 
of  the  Single  Integrated  Operations  Plan  and  other  SAC  planning  functions.  This  includes 
missile  and  aircraft  application  against  target  systems  with  all  the  associated  ramifications: 
bomber/tanker  mating,  fuel  consumption,  performance  characteristics,  optimum  routine 
resolution  of  timing  conflicts,  etc.  Also  included  is  the  production  of  planned  and 
emergency  execution  documents  and  statistical  documents. 

Total  Number  of  JOVIAL  Statements:  300,000  (est) 

Sub-application  Hardware  Configuration:  See  under  SAC-1 


Operating  System: 

Name:  EXECUTIVE 
De  ve  I  oper:  S  DC/U  SAP 

Mode  of  operation:  Batch  Processing  Real  Time 

NOTE:  "The  planning  subsystem  operates  only  in  the  batch  processing  mode.  However, 
it  can  operate  interleaved'  with  the  real  time  programs." 

Background: 

•  JOVIAL  was  used  both  to  maintain  source  language  compatibility  with  other 
related  projects  and  because  it  was  the  best  language  suited  for  the  project, 

•  Average  years  experience  of  programmers:  3 

•  Average  years  JOVIAL  experience:  3 

•  Dialect  used:  See  under  SAC-1 

•  Compilation  speed:  See  under  SAC-1 

•  Compiled  code:  See  under  SAC-1 
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(3)  Sub-application  SAC-3 


Sub-application  Nome:  Force  Control 
Sub-appI  icotion  Description: 

The  Force  Control  sub-application  modifies  a  static  dota  bose  by  processing  messoge  ond 
card  inputs  to  provide  o  present  stotus  of  SAC  SlOP  Forces  through  vorious  prints,  woll 
disploys  ond  BOJO  disploys.  DATA  PREP  modifies  and  error  checks  messoges  from  units 
for  use  by  V-1 .  V-1  updates  tobies  ond  disploys;  200  PACKAGES  uses  updoted  doto  to 
create  disploys  and  prints,  DATA  PRES  creates  the  displays  thot  ore  projected  to  woll 
screens . 

Total  Number  of  JOVIAL  Statements:  153,789 
Sub-application  Hordwore  Configurotion:  See  under  SAC-1 


Operating  System: 

Name:  EXECUTIVE 
Developer:  SDC/USAF 

Mode  of  operating  system:  Batch  processing  real  time 
Bockground: 

•  JOVIAL  was  used  both  to  maintain  source  languoge  compatibility  with  other 
related  projects  and  becouse  it  was  the  language  best  suited  for  the  project. 

•  Average  years  experience  of  programmers:  2 

•  Average  years  JOVIAL  experience:  2 

•  Diolect  used:  See  under  SAC-1 

•  Compilotion  speed:  See  under  SAC-1 

•  Compiled  code:  See  under  SAC-1 

(4)  Sub-opplication  SAC-4 

Sub-application  Name:  SlOP  Gaming  Simulation  Analysis/ADA 
Sub-application  Description: 

The  SlOP  Gaming  Simulotion  extrocts  doto  from  RISOP/SlOP  tapes  furnished  by  JWGA 
ond  prepores  data  for  Wor  Goming  Simulation  ond  Anolysis.  The  model  includes  trajec¬ 
tory  computations  ond  domoge  ossessments. 

The  purpose  of  the  ADA  is  to  provide  an  AUSTERE  DEMONSTRATION  SYSTEM  (Hordwore 
and  Softwore)  in  a  PACCS  oircroft  to  develop  ond  demonstrote  operotionol  techniques  in 
the  actuol  environment  using  ovailable  automotion  hardware  ond  a  minimum  of  develop¬ 
ment  effort . 
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Total  Number  of  JOVIAL  Statements:  Gaming  -  132,000 

ADA-  90,000 

Application  Hardware  Configuration: 

Computer  manufacturer  and  model  IBM  7090 


High  speed  memory  storage 

Size 

Word  size  if  applicable 

65,536  words 

393,216  six  bit  bytes 

36  bits 

Input/Output  devices 

Drum 

Manufacturer  and  model 

Storage  capacity 

Quantity  on  this  configuration 

17 

0 

Disc 

Manufacturer  and  model 

Storage  capacity 

IBM  1301-1 

27,960,000  six  bit  bytes 
167,760,000  bits 

Quantity  on  this  configuration 

1 

Magnetic  tapes 

Manufacturer  and  model 

Recording  densities  permitted 

Quantity  on  this  configuration 

IBM  729  IV 

200/556  bits/in 

12 

Card  reader 

Manufacturer  and  model 

Card  read  speed 

Quantity  on  this  configuration 

IBM  711 

250  cards/min 

1 

Printer 

Manufacturer  and  model 

Printer  speed 

Quantity  on  this  configuration 

IBM  716 

150  lines/min 

1 

NOTE:  One  I/O  typewriter  and  one  Hendrix  5101  crt  are  attached  to  the  IBM  7090. 
NOTE:  2  IBM  1460  computers  (with  MOD  III  printers,  MOD  III  card  reader-punches) 
plus  a  5  track  paper  tape  reader-punch  are  used  off-line  to  print  and  punch  7090  outputs. 

Operating  System: 

Name:  (Gaming)  None  used 

(ADA)  ADA  EXECUTIVE 
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Developer:  (Gaming)  N/A 
(ADA)  SAC 

Mode  of  operoting  system:  (Gaming)  N/A 

(ADA)  Reol  Time 

(Note:  ADA  does  utility  work  under  IBSYS) 

Bockground: 

•  Both  ADA  and  Gaming  used  JOVIAL  to  remain  source  longuage  compatible  with 
other  projects  ond  because  it  was  the  best  suited  language  far  the  project. 

•  Averoge  yeors  experience  progrommers:  Goming,  2.5 

ADA,  2.7 

•  Averoge  years  JOVIAL  experience:  Gaming,  2.2 

ADA,  2.0 

•  Diolect  used:  JOVIAL  J2  (Goming  and  ADA) 

•  Compilation  speed:  200  statements  per  minute  (Gaming  and  ADA) 

•  Compiled  code:  Not  relocotoble  (Gaming  and  ADA) 

12.8  Interview  Nates: 


Generol: 

SAC  may  be  going  aver  ta  third  generation  equipment  within  the  next  two  years;  it  is 
expected  that  the  carrespanding  softwore  systems  will  operote  in  o  time  shored  mode.  SAC 
would  like  ta  transfer  programs  already  written  ta  the  new  equipment  with  os  little 
reprogramming  os  possible,  but  odmits  that  a  lot  of  reprogramming  may  be  required. 

Specific: 

•  SAC  feels  thot  the  notion  of  COMPOOL  hos  outlived  its  usefulness,  though  it  is 
odmitted  that  this  feeling  is  influenced  by  the  foct  thot  the  COMPOOL  implemen¬ 
tation  used  is  overly  complex  ond  very  slow —  both  in  terms  of  machine  time  and 
personnel  interface  required.  It  is  our  impression  that  SAC  would  like  facilities 
for  aperationol ly  imposing  any  conceivable  kind  of  structuring  over  o  relotively 
unstructured  "free  standing"  data  base  in  a  short  order.  Toward  this  end  SAC  is 
currently  examining  TDMS  (ADEPT). 

•  SAC  requires  the  ability  to  manipulate  disc  and  drum  addresses  as  well  as  main 
memory  addresses  when  doing  I/O;  further,  they  would  like  the  capability  of 
incrementing  buffer  addresses  as  required. 

13.0  TWA 


13.1  Orgonizatian:  TWA  Doto  Processing  Center 

King  Rood,  Rockleigh,  N.  J. 

13.2  Cantoct:  Mr.  Duane  Witlaw 
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13.3 

Organization  Identifier: 

TWA 

13.4 

Number  of  JAQ's  Returned: 

0 

13.5 

Date  of  Interview: 

3  May  1968 

13.6 

JAQ  Response  Notes: 

Owing  to  an  extemely  tight  schedule,  TWA  was  unable  to  complete  a  JAQ ,  From  our 

conversation  at  the  interview  and  from  a  perusual  of  their  JOVIAL  Reference  Manual,  it 

appears  that  the  TWA  JOVIAL  complies  fairly  closely  to  the  standard  of  AFM  100-24. 

Particularly  interesting  are  the  several  special  features  provided: 

•  The  Burroughs  computer  on  which  the  application  is  run  is  a  multiprocessing 
machine.  A  BRANCH  statement  is  provided  to  allow  programmers  to  assign  program 
segments  to  processors  for  execution  (several  segments  may  run  in  parallel).  An 
ENDBRANCH  Statement  causes  execution  on  a  processor  to  cease. 

•  The  AWAIT  Statement  permits  the  suspension  of  a  parallel  path  of  execution  until 
the  occurance  of  some  condition. 

•  READY,  RELEASE,  and  SETUP  statements  provide  the  capabilities  for  dynamic 
al  location  of  data . 

•  EC  I  (Entry  Control  Item)  and  KEY  allow  for  the  manipulation  of  tables  with  both 
variable  length  entries  and  variable  structure  entries  at  execution  time. 

•  The  JOVIAL  compiler  was  written  by  Burroughs. 

13.7  Application:  No  data 

13.8  Interview  Notes: 

General: 

•  TWA  feels  that  the  language  (except  as  noted  in  the  specific  interview  responses) 
is  essentially  sufficient  for  its  application.  TWA  believes  its  big  problem  lies 

in  the  area  of  imposing  control  over  all  the  diverse  elements  of  the  system  at 
large.  That  is,  TWA  would  like  the  ability  to  link  COMPOOL,  program  libraries, 
and  compiler,  etc.,  together  in  such  a  way  that  any  change  to  programs  or  data 
structures  would  result  automatically  in  the  output  of  messages  stating  what  other 
parts  of  the  system  would  be  effected. 

•  TWA  desires  to  keep  the  machine  separated  from  the  functions  as  much  as  possible. 
Toward  this  end,  they  have  eliminated  Direct  Code  from  their  system. 

Specific: 

•  A  need  exists  for  "formal"  bit  string  items  and  operators  AND,  OR,  NOT, 
EITHER/OR. 
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•  TWA  would  like  to  hove  PROC's  in  COMPOOL  as  well  as  data  with  both 
the  definitional  and  external  attributes. 

•  A  desire  was  expressed  for  a  kind  of  ’’DEFINE”  facility: 

ALPHA  (’BETA) 

where  'BETA  (COMPOOL  name)  would  be  inserted  in  the  text  along  with  the 
ALPHA  in  subsequent  references. 

•  A  need  for  a  "MAKE  CURRENT”  facility  was  voiced.  Sometimes,  programs 
will  have  many  occurronces  of  the  same  table ,  It  is  desirable  to  write  one 
segment  of  code  which  references  items  in  one  table,  but  then  switch  physical 
tables  at  execution  time .  (Only  one  physical  table  is  being  handled  at  a  time  .) 
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APPENDIX  II 


JOVIAL  FEATURE  RESOLUTION  ANALYSIS 


The  folowlng  pages  contoln  the  resolution  analyses  for  oil  of  the  feotures  investigoted 
in  the  JOVIAL  Evaluotion  Study.  The  JOVIAL  Evaluotion  Questionnoire  (JAQ)  ond 
the  opprooch  for  chonge  reference  numbers  are  provided  for  each  feoture  for  cross- 
referencing  purposes.  The  resolution  Inequality,  resolution  equotlons  and  roles 
leading  to  eoch  porticulor  resolution  are  In  accordance  with  the  discussion  in  Section  1  . 

The  application  is  described  in  Appendix  1.  In  the  compliance  column,  if  the  feoture 
wos  Implemented  In  accordance  with  AFM  100-24,  it  is  noted  as  CFI;  If  not  implemented, 
CFNI;  or  If  Implemented  differently,  CFID.  The  usage  is  calculated  according  to  the 
resolution  equation. 

Resolution  equations  and  usage  rates  are  given  frequently  in  this  appendix  for  features 
which  are  "accepted  as  nucleus,"  This  Is  done  only  to  provide  the  reoder  with  a  means 
of  comporing  the  use  of  such  features  with  respect  to  other  reloted  feotures. 

The  resolution  anolysis  of  the  feotures  are  organized  occording  to  the  orgonizotion  of  the 
Approoch  for  Chonge  (AFC)  reference  numbers. 
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RESOLUTION  ANALYSIS 


JAQ  Reference: 

J  3. 5. 1.1 

.11.1 

AFC  Reference:  A  1 . 

Feature  Name: 

Resolution  Inequality 

ITEM  TYPE  HOLLERITH 

N/A 

Resolution  Equation: 

U  =  Q46/(Q46  +  050) 

Number  of  users  with 

usage  rates: 

GO  Tl  =  N/A 

Resolution: 

Data: 

Accepted 
3. 2. 2. 8) 

as  nucleus  (Note  optiona 

1  simplified  constant  form 

Application 

Compliance 

Usage 

ADPAC-l 

CFI 

.1333 

ADPAC-2 

CFl 

1 

ADPAC-3 

CFI 

1 

CSC 

CFI 

(N/A) 

FAA 

CFI 

.8 

FOCC-1 

CFI 

1 

FOCC-2 

CFI 

1 

HAM 

CFI 

1 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

1 

NAVC-3 

CFI 

1 

NCDCF 

CFI 

1 

NEL 

CFI 

.9803 

NMCSSC 

CFI 

1 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFID 

.9 

RADC-3 

CFI 

.9524 

RADC-4 

CFI 

1 

SAC-1 

CFI 

1 

SAC-2 

CFI 

1 

SAC-3 

CFI 

.7214 

SAC-4 

CFI 

1 

N(CFI)  =  21 

N(CFI  D)  = 
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1  N(CFNI)  = 

RESOLUTION  ANALYSIS 


JAQ  Reference: 
Feature  Name: 
Resolution  Inequality: 
Resolution  Equation: 


J  3. 5. 2. 5 

HOLLERITH  FORMULA 

N/A 

N/A 


AFC  Reference:  A  1.1. 1.1 


Number  of  users  with  usage  rates:  GO  Tl  =  N/A 

Resolution:  Retain  as  nucleus  (Note  modification  to  Hollerith  assignment 

Data: 


and  comparisons,  3. 2. 2.4) 


Application 

ADPAC-1 

ADPAC-2 

ADPAC-3 

CSC 

FAA 

FOCC-1 

FOCC-2 

HAM 

NAVC-1 

NAVC-2 

NAVC-3 

NCDCF 

NEL 

NMCSSC 

RADC-1 

RADC-2 

RADC-3 

RADC-4 

SAC-1 

SAC-2 

SAC-3 

SAC-4 

N(CFI) 


Compliance 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFNI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

21  N(CFID)  = 


Usage 


0  N(CFNI)  =  1 
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RESOLUTION  ANALYSIS 


JAQ  Reference: 

J  3.5.1.1.11.2 

AFC  Reference 

Feature  Name: 

ITEM  TYPE  STANDARD  TRANSMISSION  CODE 

Resolution  Inequality: 

U  GO  Tl  =  .10 

Resolution  Equation: 

U  =  050/(046  +  050) 

Number  of  users  with  usage  rates:  GO  Tl  =  2 

Resolution: 

Delete  (Note  also  CHARCODE  directive,  3. 2. 2. 3) 

Data: 

Application 

Compliance 

Usage 

ADPAC-1 

CFI 

.8666 

ADPAC-2 

CFI 

0 

ADPAC-3 

CFI 

0 

CSC 

CFI 

(N/A) 

FAA 

CFI 

0 

FOCC-1 

CFI 

0 

FOCC-2 

CFI 

0 

HAM 

CFI 

0 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

0 

NAVC-3 

CFI 

0 

NCDCF 

CFNI 

0 

NEL 

CFID 

.0196 

NMCSSC 

CFI 

0 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFNI 

0 

RADC-3 

CFI 

.0476 

RADC-4 

CFI 

0 

SAC-1 

CFI 

0 

SAC-2 

CFI 

0 

SAC-3 

CFI 

.2785 

SAC-4 

CFI 

0 

N(CFI)=  18  N(CFID)=  1  N(CFNI)=  2 
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RESOLUTION  ANALYSIS 


JAQ  Reference:  J  3. 5. 2. 5  AFC  Reference:  A  1.1. 1.2 

Feature  Name:  STANDARD  TRANSMISSION  CODE  FORMULA 

Resolution  Inequality:  N/A 
Resolution  Equation:  N/A 

Number  of  users  with  usage  rotes:  GO  Tl  =  N/A 

Resolution:  Delete  (Because  of  deletion  of  Item  Type  STC) 

Data: 


Application 

ADPAC-1 

ADPAC-2 

ADPAC-3 

CSC 

FAA 

FOCC-1 

FOCC-2 

HAM 

NAVC-1 

NAVC-2 

NAVC-3 

NCDCF 

NEL 

NMCSSC 

RADC-1 

RADC-2 

RADC-3 

RADC-4 

SAC-1 

SAC-2 

SAC-3 

SAC -4 

N(CFl) 


Compliance 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFNI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

21  N(CFID)  = 


Usage 


0  N(CFNI)  =  1 
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RESOLUTION  ANALYSIS 


JAQ  Reference;  J  3.5.1.1.14 

Feature  Name:  CHARACTER  DATA  SIZE  ATTRIBUTE 

Resolution  Inequality:  N/A 

Resolution  Equation:  N/A 

Number  of  users  with  usage  rotes:  GQ  T1  *  N/A 

Resolution:  Accept  os  nucleus 

Data: 


AFC  Reference:  A4,  Al.1.1.3 


Applicati  on 

ADPAC-1 

ADPAC-2 

ADPAC-3 

CSC 

FAA 

FOCC-1 

FOCC-2 

HAM 

NAVC-1 

NAVC-2 

NAVC-3 

NCDCF 

NEL 

NMCSSC 

RADC-1 

RADC-2 

RADC-3 

RADC-4 

SAC-1 

SAC-2 

SAC-3 

SAC -4 

N(CFI)  = 


Compliance 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

N(CFID)=  0 


Usage 


N(CFNI)  =  0 


J 
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RESOLUTION  ANALYSIS 


JAQ  Reference: 
Feature  Name: 
Resolution  Inequality: 
Resolution  Equation: 


J  3.5.1.1.13 
ITEM  TYPE  STATUS 
U  GO  =  T1  =D5 
U  =  Q58/Q14 


Number  of  users  with  usage  rotes:  GO  T1  =  7 

Resolution:  Retain  as  optional 

Data: 

Application 


ADPAC-1 

ADPAC-2 

ADPAC-3 

CSC 

FAA 

FOCC-1 

FOCC-2 

HAM 

NAVC-1 

NAVC-2 

NAVC-3 

NCDCF 

NEL 

NMCSSC 

RADC-1 

RADC-2 

RADC-3 

RADC-4 

SAC-1 

SAC-2 

SAC-3 

SAC-4 

N(CFI)  = 


Compliance 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

22  N(CFID)  = 


AFC  Reference:  A  1.1.2 


Usage 

0 

.0416 

0 

(N/A) 

.2 

.OMO 

.4000 

0 

(N/C) 

.0500 

.0100 

.0200 

.0080 

.1666 

(N/C) 

.2 

.0100 

.0303 

.1812 

.0673 

.1924 

.0532 

N(CFNI)=  0 
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RESOLUTION  ANALYSIS 


JAQ  Reference: 
Feature  Name: 
Resolution  Inequality: 
Resolution  Equation: 


J  3.5. 2.5 
STATUS  FORMULA 
N/A 
N/A 


AFC  Reference:  A  1.1.2 


Number  of  users  with  usage  rates:  GQ  T1  =  N/A 

Resolution:  Retain  os  optional  (Required  if  Status  Items  implemented) 

Data: 


Application 

ADPAC-1 

ADPAC-2 

ADPAC-3 

CSC 

FAA 

FOCC-1 

FOCC-2 

HAM 

NAVC-1 

NAVC-2 

NAVC-3 

NCDCF 

NEL 

NMCSSC 

RADC-1 

RADC-2 

RADC-3 

RADC-4 

SAC-1 

SAC-2 

SAC-3 

SAC-4 


Compliance  Usage 

CFI 
CFI 
CFI 
CFI 
CFI 
CFI 
CFI 
CFI 
CFI 
CFI 
CFI 
CFI 
CFI 
CFI 
CFI 
CFNI 
CFI 
CFI 
CFI 
CFI 
CFI 
CFI 

N(CFI)=  21  N(CF|D)=  ^  N(CFNI)  =  ^ 
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RESOLUTION  ANALYSIS 


JAQ  Reference: 

J  3.5.1. 

1.14 

AFC  Reference:  / 

Feature  Name: 

EXPLICIT  STATUS  SIZE  AHRIBUTE 

Resolution  Inequality: 

U  GO  T1 

=  .01 

Resolution  Equation: 

U  =  Q70/Q58 

Number  of  users  with 

usage  rates: 

GO  T1  =  12 

Resolution: 

Retain  as 

nucleus  (Meaningful 

only  if  Item  Type  Status 

Data: 

implemen 

ted) 

Application 

Compliance 

Usage 

ADPAC-1 

CFI 

0 

ADPAC-2 

CFI 

.6000 

ADPAC-3 

CFI 

0 

CSC 

CFI 

(N/A) 

FAA 

CFI 

.2 

FOCC-1 

CFI 

0 

FOCC-2 

CFI 

.0100 

HAM 

CFI 

0 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

.2000 

NAVC-3 

CFI 

0 

NCDCF 

CFI 

0 

NEL 

CFI 

.0500 

NMCSSC 

CFI 

.2000 

RADC-1 

CFID 

(N/C) 

RADC-2 

CFI 

.2 

RADC-3 

CFI 

1 

RADC-4 

CFI 

0 

SAC-1 

CFI 

.0500 

SAC-2 

CFI 

.1484 

SAC-3 

CFI 

.0543 

SAC-4 

CFI 

.0487 

N(CFI)=  21  N(CFID)=  ^  N(CFNI)  = 
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RESOLUTION  ANALYSIS 


JAQ  Reference:  J  3.5.1 .2  AFC  Reference:  A  1  .2.1 

Feature  Name:  STRUCTURE  ARRAY 

Resolution  Inequality:  N/A 

Resolution  Equation:  Q74(Q74  +  Q78) 

Number  of  users  with  usage  rates:  GQ  T1  =  N/A 

Resolution:  Retain  as  optional  (Note:  In  the  AFC,  we  accepted  ARRAY  as  a  nucleus 

data  structure.  Since  the  number  of  users  implementing  ARRAY  is  relatively 
Data:  small,  and  because  the  usage  where  implemented  is  low,  we  are  altering  the 

status  of  this  feature  to  "optional"). 


Application 

Compliance 

Usage 

ADPAC-1 

CFI 

0 

ADPAC-2 

CFI 

0 

ADPAC-3 

CFI 

0 

CSC 

CFID 

(N/A) 

FAA 

CFID 

.2 

FOCC-1 

CFNI 

0 

FOCC-2 

CFNI 

0 

HAM 

CFNI 

0 

NAVC-1 

CFNI 

(M/C) 

NAVC-2 

CFNI 

0 

NAVC-3 

CFNI 

0 

NCDCF 

CFNI 

0 

NEL 

CFID 

.2500 

NMCSSC 

CFNI 

0 

RADC-1 

CFID 

(N/C) 

RADC-2 

CFNI 

0 

RADC-3 

CFI 

.0322 

RADC-4 

CFI 

0 

SAC-1 

CFID 

0 

SAC-2 

CFID 

.0181 

SAC-3 

CFID 

.0417 

SAC -4 

CFID 

.0676 

N(CFI)=  5  N(CFID)  =  8  N(CFNI)  =  9 
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RESOLUTION  ANALYSIS 


JAQ  Reference: 

J  3.5. 1.3.1 

AFC  Reference:  A 

Feature  Name: 

STRUCTURE  TABLE 

Resolution  Inequality:  U  GO  Tl  -  .10 

Resolution  Equati 

on:  U  =  078/(078  +  Q74) 

Number  of  users  with  usage  rates:  GO  Tl  -  18 

Resolution: 

Data: 

Retain  as  nucleus 

Application 

Compliance 

Usage 

ADPAC-l 

CFI 

1 

ADPAC-2 

CFI 

1 

ADPAC-3 

CFI 

1 

CSC 

CFI 

(N/A) 

FAA 

CFI 

.9 

FOCC-1 

CFI 

1 

FOCC-2 

CFI 

1 

HAM 

CFI 

1 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

1 

NAVC-3 

CFI 

1 

NCDCF 

CFI 

1 

NEL 

CFI 

.7500 

NMCSSC 

CFI 

1 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFI 

.9 

RADC-3 

CFI 

.9677 

RADC-4 

CFI 

1 

SAC-1 

CFI 

1 

SAC-2 

CFI 

.9818 

SAC-3 

CFI 

.9582 

SAC-4 

CFI 

.9323 

N(CFI)=  22  N(CFID)  = 
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0  N(CFNl) 

RESOLUTION  ANALYSIS 


JAQ  Reference: 

J  3.5. 1.3.4 

AFC  Reference 

Feature  Name: 

TABLE  VARIABILITY  ATTRIBUTE 

-  RIGID 

Resolution  Inequality: 

U  GO  T1  =  .10 

Resolution  Equation: 

U  =  Q86/Q78 

Number  of  users  with  usage  rates:  GO  T1  =  18 

Resolution: 

Retain  as  nucleus 

Data: 

Application 

Compliance 

Usage 

ADPAC-1 

CFI 

.4736 

ADPAC-2 

CFI 

.8750 

ADPAC-3 

CFI 

1 

CSC 

CFI 

(N/A) 

FAA 

CFI 

.8 

FOCC-1 

CFID 

.2608 

FOCC-2 

CFID 

.7500 

HAM 

CFI 

.0625 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

1 

NAVC-3 

CFI 

.9534 

NCDCF 

CFI 

.4000 

NEL 

CFI 

.666 

NMCSSC 

CFI 

0 

RADC-1 

CFID 

(N/C) 

RADC-2 

CFI 

.9 

RADC-3 

CFI 

.1666 

RADC-4 

CFI 

.5555 

SAC-1 

CFI 

.5952 

SAC-2 

CFI 

.4615 

SAC-3 

CFI 

.9556 

SAC-4 

CFI 

.6113 

N(CFI)=  N(CFID)=  2  N(CFNI)=  ^ 
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RESOLUTION  ANALYSIS 


JAQ  Reference:  J  3. 5. 1.3. 4  AFC  Reference:  A  1.2.3 

Feature  Name:  TABLE  VARIABILITY  ATTRIBUTE  -  VARIABLE 

Resolution  Inequality:  U  GO  T1  =  .10 
Resolution  Equation:  1  -  (Q86/Q87) 

Number  of  users  with  usage  rotes:  GQ  T1  =  18 


Resolution:  Retain  as  nucleus 

Data: 

Application 


ADPAC-1 

ADPAC-2 

ADPAC-3 

CSC 

FAA 

FOCC-1 

FOCC-2 

HAM 

NAVC-1 

NAVC-2 

NAVC-3 

NCDCF 

NEL 

NMCSSC 

RADC-1 

RADC-2 

RADC-3 

RADC-4 

SAC-1 

SAC-2 

SAC-3 

SAC-4 

N(CFI)  = 


Compliance 

CFI 

CFI 

CFI 

CFI 

CFI 

CFID 

CFID 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFID 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

19  N(CFID)=  3 


Usage 

.5264 

.1250 

0 

N/A 

.2 

.7392 

.2500 

.9375 

N/C 

0 

.0466 

.6000 

.334 

1 

N/C 

.1 

.8334 

.4445 

.4048 

.5385 

.0444 

.3887 

N(CFNI)=  0 
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JAQ  Reference:  J  3. 5. 2. 2. 2. 6 

Feature  Name:  NENT 

Resolution  Inequality:  U  GQ  T1  =  .10 

Resolution  Equation:  U  =  Q169/Q78 

Number  of  users  with  usage  rates:  GQ  T1  =15 

Resolution:  Retain  os  nucleus 


Data: 

Application 

ADPAC-1 

ADPAC-2 

ADPAC-3 

CSC 

FAA 

FOCC-1 

FOCC-2 

HAM 

NAVC-1 

NAVC-2 

NAVC-3 

NCDCF 

NEL 

NMCSSC 

RADC-1 

RADC-2 

RADC-3 

RADC-4 

SAC-1 

SAC-2 

SAC-3 

SAC-4 


Compliance 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

N(CFI)=  22  N(CFID)  = 


AFC  Reference:  A  1.2.3 


Usage 

.6315 

.1250 

0 

(N/A) 

.8 

1.304 

.2500 

.9375 

(N/C) 

1 

.8139 

1 

.0166 

.6666 

(N/C) 

.2 

0 

.0555 

1.976 

.3230 

.8076 

1.279 

N(CFNl)  =  0 
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JAQ  Reference:  J  3. 5. 2. 1.2 

Feature  Name:  NWDSEN 

Resolution  Inequality:  U  GO  T1  =  .02 

Resolution  Equation:  U  =  Q140/Q78 

Number  of  users  with  usage  rotes:  GQ  T1  =  0 

Resolution:  Retain  as  optional 

Data: 

Applicotion 


ADPAC-1 

ADPAC-2 

ADPAC-3 

CSC 

FAA 

FOCC-1 

FOCC-2 

HAM 

NAVC-1 

NAVC-2 

NAVC-3 

NCDCF 

NEL 

NMCSSC 

RADC-1 

RADC-2 

RADC-3 

RADC-4 

SAC-1 

SAC-2 

SAC-3 

SAC-4 

N(CFI)  = 


Compliance 

CFI 

CFI 

CFI 

CFID 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFNI 

CFI 

CFNI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

N(CFID)=  1 


AFC  Reference:  A  1.2.4 


Usage 

0 

0 

0 

(N/A) 

.8 

.0173 

0 

0 

(N/C) 

0 

0 

0 

.0166 

0 

(N/C) 

.1 

0 

0 

.0119 

.0115 

.0087 

.0010 

N(CFNI)  =2 
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JAQ  Reference: 

J  3. 5.1.4 

AFC  Reference:  A  1.2.5 

Feature  Name: 

STRUCTURE  STRING 

Resolution  Inequality:  U  GQ  T1  =  .10 

Resolution  Equation:  U  =  Q103/Q78 

Number  of  users  wi 

th  usage  rates:  GQ  T1  =  2 

Resolution: 

Data: 

Delete 

Applicati  on 

Compliance 

Usage 

ADPAC-1 

CFNI 

0 

ADPAC-2 

CFNI 

0 

ADPAC-3 

CFNI 

0 

CSC 

CFI 

(N/A) 

FAA 

CFl 

.2 

FOCC-1 

CFNI 

0 

FOCC-2 

CFNI 

0 

HAM 

CFNI 

0 

NAVC-1 

CFNI 

(N/C) 

NAVC-2 

CFNI 

0 

NAVC-3 

CFNI 

0 

NCDCF 

CFNI 

0 

NEL 

CFNI 

0 

NMCSSC 

CFNI 

0 

RADC-1 

CFNI 

(N/C) 

RADC-2 

CFNI 

0 

RADC-3 

CFNI 

0 

RADC-4 

CFNI 

0 

SAC-1 

CFI 

0 

SAC-2 

CFI 

.0307 

SAC-3 

CFI 

.2697 

SAC-4 

CFI 

.0357 

N(CFI)=  6  N(CFID)  = 
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JAQ  Reference:  J  3.5. 2.2.2. 1 

Feature  Name;  BIT 


Resolution  Inequality:  U  GQ  T1  =  .03 
Resolution  Equation:  U  =  Q149/Q14 

Number  of  users  with  usage  rates:  GQ  T1  =  10 

Resolution:  Retain  as  optional 

Data: 


Application 

ADPAC-1 

ADPAC-2 

ADPAC-3 

CSC 

FAA 

FOCC-1 

FOCC-2 

HAM 

NAVC-1 

NAVC-2 

NAVC-3 

NCDCF 

NEL 

NMCSSC 

RADC-1 

RADC-2 

RADC-3 

RADC-4 

SAC-1 

SAC-2 

SAC-3 

SAC-4 


Compliance 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFID 

CFID 

CFID 

CFID 

N(CFI)  =  18  N(CFID)  = 
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AFC  Reference;  ^  2 


Usage 

0 

.0416 

0 

(N/A) 

.8 

.0200 

.0200 

0 

(N/C) 

.1000 

0 

.0800 

.0020 

.6666 

(N/C) 

.9 

.0100 

.1635 

.0966 

.0210 

.0689 

.0649 

N(CFNI) 


RESOLUTION  ANALYSIS 


JAQ  Reference: 

J  3. 5. 2.2. 2. 2 

AFC  Reference 

Feature  Name: 

BYTE 

Resolution  Inequality: 

U  GQ  T1  =  .03 

Resolution  Equation: 

U  =  Q153/(Q46  +Q50) 

Number  of  users  with  usage  rates;  GQ  T1  =  15 

Resolution: 

Retain  as  nucleus 

Data: 

Application 

Compliance 

Usage 

ADPAC-1 

CFI 

2.883 

ADPAC-2 

CFI 

2.428 

ADPAC-3 

CFI 

1.291 

CSC 

CFI 

(N/A) 

FAA 

CFI 

.8 

FOCC-1 

CFI 

.3076 

FOCC-2 

CFI 

.0150 

HAM 

CFI 

4.000 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

.1500 

NAVC-3 

CFI 

0 

NCDCF 

CFI 

.8571 

NEL 

CFI 

.0294 

NMCSSC 

CFI 

.6666 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFNI 

0 

RADC-3 

CFI 

.7500 

RADC-4 

CFI 

.6666 

SAC-1 

CFID 

4.235 

SAC-2 

CFID 

2.058 

SAC-3 

CFID 

.9856 

SAC-4 

CFI 

.9605 

N(CFI)=  17  N(CFID)=  N(CFNI)  = 
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JAQ  Reference: 
Feature  Name: 
Resolution  Inequality: 
Resolution  Equation: 


J  3.5. 2. 2. 2. 3-4 
CHAR/MANT 
U  GQ  T1  =  .03 
U  =  (Q157  +  Q161)/Q38 


Number  of  users  with  usage  rates: 
Resolution:  Delete 

Data: 


GQ  T1  =  1 


Application 


ADPAC-1 

ADPAC-2 

ADPAC-3 

CSC 

FAA 

FOCC-1 

FOCC-2 

HAM 

NAVC-1 

NAVC-2 

NAVC-3 

NCDCF 

NEL 

NMCSSC 

RADC-1 

RADC-2 

RADC-3 

RADC-4 

SAC-1 

SAC-2 

SAC-3 

SAC-4 

N(CFI)  = 


Compliance 

CFI 

CFI 

CFI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFI 

CFNI 

CFNI 

CFI 

CFI 

CFI 

CFNI 

CFNI 

CFNI 

CFNI 

N(CFID)=  0 
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AFC  Reference:  A  2.3 


Usage 

0 

.2000 

0 

(N/A) 

0 

0 

0 

0 

(N/C) 

0 

0 

0 

.0200 

0 

(N/C) 

0 

0 

0 

0 

0 

0 

0 

N(CFN1)= 
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JAQ  Reference: 

J  3. 5.2.2. 1 

AFC  Reference:  A 

Feature  Name: 

SUBSCRIPTING  -  Expressed  as  Complex  Numeric  Formul 

Resolution  Inequality: 

N/A 

Resolution  Equation: 

U  =  Q144/(Q74  +  Q78  +  Q103) 

Number  of  users  with  usage  rates:  GQ  T1  =  N/A 

Resolution: 

Accepted  as  nucleus 

Data: 

Applicati  on 

Compliance 

Usage 

ADPAC-1 

CFI 

.3684 

ADPAC-2 

CFI 

.1250 

ADPAC-3 

CFI 

1 

CSC 

CFI 

(N/A) 

FAA 

CFI 

.8 

FOCC-1 

CFI 

.1304 

FOCC-2 

CFI 

.6250 

HAM 

CFI 

0 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

.2000 

NAVC-3 

CFI 

.5813 

NCDCF 

CFI 

.4000 

NEL 

CFI 

.0750 

NMCSSC 

CFI 

6.666 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFI 

.9 

RADC-3 

CFI 

32.25 

RADC-4 

CFI 

4.444 

SAC-1 

CFID 

1.500 

SAC-2 

CFID 

.5425 

SAC-3 

CFID 

1.229 

SAC-4 

CFID 

.8433 

N(CFl)  = 


18 


N(CFID)  = 


4 


N(CFNl)  = 
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JAQ  Reference:  J  3. 5. 2. 2 

.1 

AFC  Reference:  A  2. 

Feature  Name:  SUBSCRIPTING  -  Nested 

Resolution  Inequality:  N/A 

Resolution  Equation:  U  =  Q145/(Q74  +  Q78  +  Q1  03) 

Number  of  users  with  usage  rates: 

GQ  T1  =  N/A 

Resolution:  Accepted 

as  nucleus 

Data: 

Application 

Compliance 

Usage 

ADPAC-l 

CFI 

0 

ADPAC-2 

CFI 

0 

ADPAC-3 

CFI 

.8000 

CSC 

CFI 

(N/A) 

FAA 

CFI 

.8 

FOCC-1 

CFI 

.0869 

FOCC-2 

CFI 

1.250 

HAM 

CFI 

0 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

.0666 

NAVC-3 

CFI 

.2325 

NCDCF 

CFI 

1 

NEL 

CFI 

.0050 

NMCSSC 

CFI 

1.333 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFI 

.2 

RADC-3 

CFI 

16.12 

RADC-4 

CFI 

.1111 

SAC-1 

CFID 

.3095 

SAC-2 

CFID 

.2932 

SAC-3 

CFID 

2.030 

SAC-4 

CFID 

.5927 

N(CFI)= 

N(CFID)  = 

N(CFNl)  = 
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JAQ  Reference:  J  3.5. 2.6  AFC  Reference:  2.5 

Feature  Name:  TABLE  ENTRY  REFERENCING  (ENTRY/ENT) 


Resolution  Inequality: 

U  GQ  T1 

=  .02 

Resolution  Equation: 

U  =  Q200/Q78 

Number  of  users  with  usage  rates: 

GQ  T1  -  13 

Resolution: 

Retain  as 

nucleus 

Data; 

Application 

Compliance 

Usage 

ADPAC-1 

CFID 

.6315 

ADPAC-2 

CFID 

.2500 

ADPAC-3 

CFID 

0 

CSC 

CFI 

(N/A) 

FAA 

CFID 

.8 

FOCC-1 

CFI 

.0652 

FOCC-2 

CFI 

2.500 

HAM 

CFI 

0 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

.3333 

NAVC-3 

CFI 

0 

NCDCF 

CFI 

.0400 

NEL 

CFI 

.0200 

NMCSSC 

CFID 

.6666 

RADC-1 

CFID 

(N/C) 

RADC-2 

CFNI 

0 

RADC-3 

CFI 

0 

RADC-4 

CFI 

0 

SAC-1 

CFID 

.6904 

SAC-2 

CFID 

.2307 

SAC-3 

CFID 

.4125 

SAC-4 

CFID 

.2202 

N(CFID)  =  9  N(CFNI)  =  3 


N(CFI)  =  9 
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JAQ  Reference:  j  3. 5. 2. 2.1  Reference:  ^  2.6 

Feature  Name: 

Resolution  Inequality:  |s|/A 

Resolution  Equation:  eNT:  U  =  Q201/Q200;  ENTRY:  U  =  1  -  Q201/Q200 

Number  of  users  with  usage  rates:  qq  71  =  [sj/a 

Resolution:  Retain  ENTRY  as  nucleus;  delete  ENT  (Basis  of  resolution:  As  shown  below,  the 
Data*  majority  of  applications  implementing  both  ENT  and  ENTRY  and  which  use 

table  entry  referencing  at  all,  use  ENTRY  either  exclusively  or  in  most  cases.) 


Application 

ENT 

Compliance 
- - ENTRY 

Usage 

ENT  ENTRY 

ADPAC-1 

CFRl 

■CFI — 

■0 — 

— 1 - 

ADPAC-2 

CFNI 

CFI 

0 

1 

ADPAC-3 

CFNI 

CFI 

0 

1 

CSC 

CFI 

CFI 

(N/A) 

(N/A) 

FAA 

CFI 

CFNI 

1 

0 

FOCC-1 

CFI 

CFI 

0 

1 

FOCC-2 

CFI 

CFI 

0 

1 

HAM 

CFI 

CFI 

0 

0 

NAVC-1 

CFI 

CFI 

(N/C) 

(N/C) 

NAVC-2 

CFI 

CFI 

0 

1 

NAVC-3 

CFI 

CFI 

0 

0 

NCDCF 

CFI 

CFI 

0 

1 

NEL 

CFI 

CFI 

.8333 

.1667 

NMCSSC 

CFNI 

CFI 

0 

1 

RADC-1 

CFI 

CFI 

(N/C) 

(N/C) 

RADC-2 

CFNI 

CFNI 

(N/C) 

(N/C) 

RADC-3 

CFI 

CFI 

0 

0 

RADC-4 

CFI 

CFI 

0 

0 

SAC-1 

CFI 

CFNI 

1 

0 

SAC-2 

CFI 

CFNI 

1 

0 

SAC-3 

CFI 

CFNI 

1 

0 

SAC-4 

CFI 

CFNI 

1 

0 

ENT: 

N(CFI)  = 

N(CF1D)  = 

0 

N(CFNi)=  • 

ENTRY: 

N(CFI)  = 

16  N(CFID)  = 

0 

N(CFNI)  =  6 
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JAQ  Reference:  J  3.5.1.1.15  AFC  Reference;  A3 

Feature  Name:  COMPUTER  REPRESENTATION  OF  DATA 

Resolution  Inequality:  N/A 

Resolution  Equation:  N/A 

Number  of  users  with  usage  rates:  GQ  T1  =  N/A 


Resolution: 

Data: 

Applicati  on 

ADPAC-1 

ADPAC-2 

ADPAC-3 

CSC 

FAA 

FOCC-1 

FOCC-2 

HAM 

NAVC-1 

NAVC-2 

NAVC-3 

NCDCF 

NEL 

NMCSSC 

RADC-1 

RADC-2 

RADC-3 

RADC-4 

SAC-1 

SAC-2 

SAC-3 

SAC -4 


Modified  os  specified  in  3.2.2. 1  (hexadecimal  constant),  3.2. 2. 3 
(CHARCODE),  3. 2. 2. 5  (computer  representation  of  numeric  variables 
and  constants,  and  3. 2.2. 1  0  (extended  precision) 

Compliance  Usage 

CFI 

CFI 

CFI 

CFID 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFID 

CFID 

CFID- 

CFI 

CFI 

CFID 

CFID 

CFID 

CFID 

CFI 


N(CFI)  =  14 


N(CFID)=  8  N(CFN1)=  0 
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JAQ  Reference: 
Feature  Name: 
Resolution  Inequality: 
Resolution  Equation: 


J  3. 5.1. 1.1 
OCTAL  CONSTANT 
U  GE  T1  =  1 
U  =  Q4 


Number  of  users  with  usage  rates:  T1  -  18 


AFC  Reference:  A  3.1 


Resolution:  "Bil’  String  Constant"  Facility  provided  by  Octal  Constant  is 

retained  as  nucleus;  however,  octal  is  optional  if  hexadecimal 
(3.2.2. 1)  is  chosen  for  implementation. 


Application 

Compliance 

Usage 

ADPAC-1 

CFI 

48 

ADPAC-2 

CFI 

60 

ADPAC-3 

CFI 

1 

CSC 

CFI 

(N/A) 

FAA 

CFI 

.2 

FOCC-1 

CFI 

70 

FOCC-2 

CFI 

70 

HAM 

CFI 

130 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

12 

NAVC-3 

CFI 

1 

NCDCF 

CFI 

30 

NEL 

CFI 

1,000 

NMCSSC 

CFI 

50 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFI 

.7 

RADC-3 

CFI 

30 

RADC-4 

CFI 

25 

SAC-1 

CFID 

520 

SAC-2 

CFID 

5000 

SAC-3 

CFID 

453 

SAC-4 

CFID 

860 

N(CFI)=  18 


N(CFID)=  4 


N(CFNI)  =  0 
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JAQ  Reference: 

J  3. 5.1. 3. 5 

AFC  Reference 

Feature  Name: 

BASIC  TABLE  STRUCTURE  ATTRIBUTE  -  PARALLEL 

Resolution  Inequality: 

U  GQ  T1  =  .10 

Resolution  Equation: 

U  =  Q89/(Q89A  +  Q89) 

Number  of  users  with  usage  rates:  GQTl  =  10 

Resolution: 

Retain  as  nucleus 

Data: 

Application 

Compliance 

Usage 

ADPAC-1 

CFI 

.8157 

ADPAC-2 

CFI 

.0625 

ADPAC-3 

CFI 

1 

CSC 

CFI 

(N/A) 

FAA 

CFID 

0 

FOCC-1 

CFI 

0 

FOCC-2 

CFI 

.1428 

HAM 

CFI 

1 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

0 

NAVC-3 

CFI 

.9767 

NCDCF 

CFI 

0 

NEL 

CFI 

.8000 

NMCSSC 

CFI 

.3333 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFI 

.2 

RADC-3 

CFI 

.5000 

RADC-4 

CFI 

.9090 

SAC-1 

CFNI 

0 

SAC-2 

CFNI 

0 

SAC-3 

CFNI 

0 

SAC-4 

CFID 

0 

N(CFI)  = 


17 


N(CFID)  = 


2 


N(CFNl)  = 
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JAQ  Reference:  J  3. 5. 1.3. 5  AFC  Reference:  3^3 


Feature  Name: 

BASIC  TABLE  STRUCTURE  ATTRIBUTE 

-  SERIAL 

Resolution  Inequality: 

U  GQ  =  .10 

Resolution  Equation: 

U  =  Q89A/(Q89A  +  Q89) 

Number  of  users  with  usage  rates:  GQ  T1  =  16 

Resolution: 

Retain  as  nucleus 

Data: 

Application 

Compliance 

Usage 

ADPAC-1 

CFI 

.1842 

ADPAC-2 

CFI 

.9375 

ADPAC-3 

CFI 

0 

CSC 

CFI 

(N/A) 

FAA 

CFID 

.9 

FOCC-1 

CFI 

1 

FOCC-2 

CFI 

.8572 

HAM 

CFI 

0 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

1 

NAVC-3 

CFI 

.0232 

NCDCF 

CFI 

1 

NEL 

CFI 

.2000 

NMCSSC 

CFI 

.6666 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFI 

.9 

RADC-3 

CFI 

.5000 

RADC-4 

CFI 

.9090 

SAC-1 

CFI 

1 

SAC-2 

CFI 

1 

SAC-3 

CFI 

1 

SAC-4 

CFID 

1 

N(CFI)=  20  N(CFID)=  2  N(CFM)  =  0 
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JAQ  Reference: 

J  3. 5.1. 3. 6.1 

AFC  Reference 

Feature  Name: 

ORDINARY  PACKING  -  Medium 

and/or  Dense 

Resolution  Inequality; 

U  GQ  T1  =  .02 

Resolution  Equation: 

U  =  (Q95  +  Q95A)  +/Q78 

Number  of  users  with  usage  rates;  GQ  T1  =  14 

Resolution; 

Retain  as  optional 

Data; 

Application 

Compliance 

Usage 

ADPAC-1 

CFI 

0 

ADPAC-2 

CFI 

.0625 

ADPAC-3 

CFI 

0 

CSC 

CFI 

(N/A) 

FAA 

CFI 

0 

FOCC-1 

CFID 

0 

FOCC-2 

CFID 

0 

HAM 

CFI 

0 

NAVC-1 

CFID 

(N/C) 

NAVC-2 

CFID 

0 

NAVC-3 

CFID 

0 

NCDCF 

CFID 

0 

NEL 

CFID 

.3333 

NMCSSC 

CFID 

0 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFID 

.2222 

RADC-3 

CFI 

.1666 

RADC-4 

CFID 

.0222 

SAC-1 

CFID 

(N/C) 

SAC-2 

CFID 

(N/C) 

SAC-3 

CFID 

(N/C) 

SAC-4 

CFID 

0 

N(CFI)=  8  N(CFID)=  W  N(CFNl) 
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JAQ  Reference: 
Feature  Name: 
Resolution  Inequality: 
Resolution  Equation: 


J  3. 5.1. 3. 6.1 

ORDINARY  PACKING  -  Medium 
UGQ  T1  =  .05 
U  =  Q95/(Q95  +  Q95A) 


Number  of  users  with  usage  rates; 
Resolution:  Delete 


GQ  T1  =  0 


AFC  Reference:  A  3.4 


Data: 

Application 

ADPAC-1 

ADPAC-2 

ADPAC-3 

CSC 

FAA 

FOCC-1 

FOCC-2 

HAM 

NAVC-1 

NAVC-2 

NAVC-3 

NCDCF 

NEL 

NMCSSC 

RADC-1 

RADC-2 

RADC-3 

RADC-4 

SAC-1 

SAC-2 

SAC-3 

SAC-4 


Compliance  Usage 

CFI  0 

CFI  0 

CFI  0 

CFI  (N/A) 

CFI  0 

CFNI  0 

CFNI  0 

CFI  0 

CFNI  (N/C) 

CFNI  0 

CFNI  0 

CFID  0 

CFNI  0 

CFNI  0 

CFI  (N/C) 

CFNI  0 

CFI  0 

CFNI  0 

CFID  0 

CFID  0 

CFID  0 

CFID  0 

N(CFI)=  8  N(CFID)  =  14  N(CFNI)  =  0 
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RESOLUTION  ANALYSIS 


J  3. 5.1. 3.6.1 

ORDINARY  PACKING  -  Dense 
U  GQ  T1  =  .05 


A  3.4 


JAQ  Reference:  i  -5  i  a  i  AFC  Reference; 

Feature  Name: 

Resolution  Inequality: 

Resolution  Equation:  j  =  Q95A/(Q95  +  Q95A) 

Number  of  users  with  usage  rates:  qq  T1  =  5 

Resolution:  Retain  os  optional  (must  be  implemented  if  Ordirwry  Packing 

Data: 


is  implemented) 


Application 

ADPAC-1 

ADPAC-2 

ADPAC-3 

CSC 

FAA 

FOCC-1 

FOCC-2 

HAM 

NAVC-1 

NAVC-2 

NAVC-3 

NCDCF 

NEL 

NMCSSC 

RADC-1 

RADC-2 

RADC-3 

RADC-4 

SAC-1 

SAC-2 

SAC-3 

SAC-4 


Compliance  Usage 

CFI  0 

CFI  1 

CFI  0 

CFI  (N/A) 

CFI  0 

CFI  0 

CFI  0 

CFI  0 

CFI  (N/C) 

CFI  0 

CFI  0 

CFNI  0 

CFI  1 

CFI  0 

CFI  (N/C) 

CFI  1 

CFI  1 

CFI  1 

CFID  0 

CFID  0 

CFID  0 

CFID  0 

N(CFI)=  8  N(CFID)=14  N(CFNI)=  0 
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RESOLUTION  ANALYSIS 


JAQ  Reference: 

J  3. 5. 1.3. 6.1 

AFC  Reference 

Feature  Name: 

NO"  PACKING  NOTATION 

-  "N" 

Resolution  Inequality: 

U  GQ  T1  =  .05 

Resolution  Equation: 

U  =  Q94/(Q93  +  Q94) 

Number  of  users  with  usage  rates:  GQ  T1  =  1 

Resolution: 

Delete 

Data: 

Application 

Compliance 

Usage 

ADPAC-1 

CFI 

0 

ADPAC-2 

CFI 

0 

ADPAC-3 

CFI 

0 

CSC 

CFI 

(N/A) 

FAA 

CFI 

0 

FOCC-1 

CFID 

0 

FOCC-2 

CFID 

0 

HAM 

CFI 

0 

NAVC-1 

CFID 

(N/C) 

NAVC-2 

CFID 

0 

NAVC-3 

CFID 

0 

NCDCF 

CFID 

0 

NEL 

CFID 

0 

NMCSSC 

CFID 

0 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFID 

.818 

RADC-3 

CFI 

1 

RADC-4 

CFID 

.027 

SAC-1 

CFID 

0 

SAC-2 

CFID 

0 

SAC -3 

CFID 

0 

SAC-4 

CFID 

0 

N(CFI)  =  8  N(CFID)  =  14  N(CFNI)  =  0 
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RESOLUTION  ANALYSIS 


JAQ  Reference: 

J  3.5. 1.3. 6. 2 

AFC  Reference 

Feature  Name: 

DEFINED  PACKING 

Resolution  Inequality: 

U  GQ  T1  =  .10 

Resolution  Equation: 

U  =  Q99/Q78 

Number  of  users  with  usage  rates:  GQ  T1  =  17 

Resolution; 

Retain  as  nucleus 

Data: 

Applicati  on 

Compliance 

Usage 

ADPAC-1 

CFI 

.4473 

ADPAC-2 

CFI 

.9375 

ADPAC-3 

CFI 

1 

CSC 

CFI 

(N/A) 

FAA 

CFI 

.2 

FOCC-1 

CFI 

1 

FOCC-2 

CFI 

1 

HAM 

CFI 

.0625 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

1 

NAVC-3 

CFI 

.9534 

NCDCF 

CFI 

.6000 

NEL 

CFI 

.1666 

NMCSSC 

CFI 

.4666 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFI 

.9 

RADC-3 

CFI 

0 

RADC-4 

CFI 

.222 

SAC-1 

CFID 

.3095 

SAC-2 

CFID 

.5384 

SAC-3 

CFID 

.7423 

SAC-4 

CFID 

.7875 

N(CFI)=  18  N(CFID)=4  N(CFNI) 
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RESOLUTION  ANALYSIS 


JAQ  Reference: 

J  3. 5.1. 7.1 

AFC  Reference; 

Feature  Name: 

INDEPENDENT  OVERLAY  DECLARATION 

Resolution  Inequality: 

U  GQ  T1  =  1 

Resolution  Equation: 

U  =  Q129 

Number  of  users  with  usage  rates:  GQ  T1  =  15 

Resolution: 

Retain  os  nucleus 

Data: 

Applicati  on 

Compliance 

Usage 

ADPAC-1 

CFI 

19 

ADPAC-2 

CFI 

7 

ADPAC-3 

CFI 

0 

CSC 

CFID 

(N/A) 

FAA 

CFNI 

0 

FOCC-1 

CFI 

30 

FOCC-2 

CFI 

10 

HAM 

CFI 

0 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

2 

NAVC-3 

CFI 

0 

NCDCF 

CFI 

5 

NEL 

CFI 

30 

NMCSSC 

CFI 

25 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFI 

1  or  more 

RADC-3 

CFI 

3 

RADC-4 

CFI 

25 

SAC-1 

CFID 

10 

SAC-2 

CFID 

250 

SAC-3 

CFID 

77 

SAC-4 

CFID 

1370 

N(CFi)=  16  N(CFiD)=  5  N(CFNi)  = 


1 


159 


RESOLUTION  ANALYSIS 


JAQ  Reference:  J  3.5. 1.7.2  AFC  Reference:  A  3.6 

Feature  Name:  SUBORDINATE  OVERLAY  DECLARATION 

Resolution  Inequality:  U  GQ  T1  =  1 

Resolution  Equation:  U  =  Q133 

Number  of  users  with  usage  rates:  T1  =  0 

Resolution:  Delete 

Data: 

Application 

Compliance 

Usage 

ADPAC-1 

CFNI 

0 

ADPAC-2 

CFNI 

0 

ADPAC-3 

CFNI 

0 

CSC 

CFI 

(N/A) 

FAA 

CFNI 

0 

FOCC-1 

CFNI 

4 

FOCC-2 

CFNI 

0 

HAM 

CFNI 

0 

NAVC-1 

CFNI 

(N/C) 

NAVC-2 

CFNI 

0 

NAVC-3 

CFNI 

0 

NCDCF 

CFNI 

0 

N£L 

CFNI 

0 

NMCSSC 

CFNI 

0 

RADC-1 

CFNI 

(N/C) 

RADC-2 

CFNI 

0 

RADC-3 

CFNI 

0 

RADC-4 

CFNI 

0 

SAC-1 

CFID 

10 

SAC-2 

CFID 

20 

SAC-3 

CFID 

10 

SAC-4 

CFID 

N(CFI)=  1  N(CFID)=  ^ 

10 

N(CFNI)  =  ^ 
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RESOLUTION  ANALYSIS 


JAQ  Reference: 

J  3. 5.2. 1.1 

AFC  Reference 

Feature  Name: 

•LOG 

Resolution  Inequality: 

U  GQ  T1  =  1 

Resolution  Equation: 

U  =  Q136 

Number  of  users  with  usage  rates:  T1  -4 

Resolution: 

Retain  as  nucleus* 

Data: 

Applicati  on 

Compliance 

Usage 

ADPAC-1 

CFNI 

0 

ADPAC-2 

CFNI 

0 

ADPAC-3 

CFNI 

0 

CSC 

CFID 

(N/A) 

FAA 

CFNI 

0 

FOCC-1 

CFI 

5 

FOCC-2 

CFI 

3 

HAM 

CFI 

0 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

3 

NAVC-3 

CFI 

0 

NCDCF 

CFNI 

0 

NEL 

CFI 

73 

NMCSSC 

CFNI 

0 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFNI 

0 

RADC-3 

CFI 

0 

RADC-4 

CFNI 

0 

SAC-1 

CFNI 

0 

SAC-2 

CFNI 

0 

SAC-3 

CFNI 

0 

SAC-4 

CFID 

0 

N(CFI)=  9  N(CF1D)=  2  N(CFNl)  =  11 

These  data  indicate  that  'LOG  be  retained  as  optional.  Responses  to  Interview  Question  I-IS  (2) 
indicate  nucleus,  however. 
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RESOLUTION  ANALYSIS 


JAQ  Reference:  J  3. 5. 2. 3.1  AFC  Reference:  ^4 

Feature  Name:  PARENTHESIZED  NUMERIC  FORMULAS 

Resolution  Inequality:  N/A 
Resolution  Equation:  U  =  Q1 73 


Number  of  users  with  usage  rates:  qq  J]  >  n/a 

Resolution:  Accept  as  nucleus 

Data: 


Application 

ADPAC-1 

ADPAC-2 

ADPAC-3 

CSC 

FAA 

FOCC-1 

FOCC-2 

HAM 

NAVC-1 

NAVC-2 

NAVC-3 

NCDCF 

NEL 

NMCSSC 

RADC-1 

RADC-2 

RADC-3 

RADC-4 

SAC-1 

SAC-2 

SAC-3 

SAC-4 


Compli 


once 


CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 


Usage 

14 

15 
0 

(N/A) 

0 

30 

100 

230 

(N/C) 

20 

50 

20 

10 

1000 

(N/C) 

1  or  more 
500 
20 
240 
2700 
968 
2290 


N(CFI)  =  22 


N(CFID)  =  0 


N(CFNl)  = 


RESOLUTION  ANALYSIS 


JAQ  Reference:  J  3. 5. 2. 3.5  AFC  Reference:  A  4 

Feature  Name:  MIXED  ITEM  TYPES  IN  NUMERIC  FORMULAS 

Resolution  Inequality:  N/A 

Resolution  Equation:  U  =  Q189 

Number  of  users  with  usage  rates:  GQ  T1  =  N/A 


Resolution: 

Accept  as  nucleus 

[)ata: 

Application 

Complia 

ADPAC-1 

CFI 

ADPAC-2 

CFI 

ADPAC-3 

CFI 

CSC 

CFI 

FAA 

CFI 

FOCC-1 

CFI 

FOCC-2 

CFI 

HAM 

CFI 

NAVC-1 

CFI 

NAVC-2 

CFI 

NAVC-3 

CFI 

NCDCF 

CFID 

NEL 

CFI 

NMCSSC 

CFI 

RADC-1 

CFI 

RADC-2 

CFI 

RADC-3 

CFI 

RADC-4 

CFI 

SAC-1 

CFI 

SAC-2 

CFI 

SAC-3 

CFI 

SAC-4 

CFI 

N(CFI)=  N(CFID)  = 


Usage 

0 

20 

0 

(N/A) 

1  or  more 
150 
50 
0 

(N/C) 

5 

0 

10 

150 

100 

(N/C) 

1  or  more 
20 
10 
100 
4500 
0 

80 

N(CFNl)  = 


0 
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RESOLUTION  ANALYSIS 


JAQ  Reference: 

J  3. 5. 1.1.4 

AFC  Reference 

Feature  Name: 

ITEM  TYPE  INTEGER 

Resolution  Inequality: 

N/A 

Resolution  Equation: 

U  =  018/(018 +  022 +  038) 

Number  of  users  with  usage  rates: 

GO  T1  =  15 

Resolution: 

Accept  as 

nucleus 

Data: 

Application 

Compliance 

Usage 

ADPAC-1 

CFID 

.7525 

ADPAC-2 

CFID 

.1428 

ADPAC-3 

CFID 

.4772 

CSC 

CFI 

(N/A) 

FAA 

CFI 

.9 

FOCC-1 

CFI 

.0963 

FOCC-2 

CFI 

.1428 

HAM 

CFI 

.0303 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

.2857 

NAVC-3 

CFI 

.1000 

NCDCF 

CFI 

.8000 

NEL 

CFI 

.5000 

NMCSSC 

CFI 

.M76 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFNI 

0 

RADC-3 

CFI 

.9937 

RADC-4 

CFI 

.7142 

SAC-1 

CFID 

.9539 

SAC-2 

CFID 

.8791 

SAC-3 

CFID 

.9649 

SAC-4 

CFID 

.9570 

N(CFI)=  N(CFID)=  7  N(CFNI) 
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RESOLUTION  ANALYSIS 

JAQ  Reference:  J  3. 5. 1.1. 5 

Feature  Name:  ITEM  TYPE  FIXED  POINT 

Resolution  Inequality:  N/A 

Resolution  Equation:  (J  =  Q2V(Q18  +  Q22  +  Q38) 

Number  of  users  with  usage  rates:  GO  =  N/A 

Resolution:  Accept  as  nucleus 

Data: 

Application 


ADPAC-1 

ADPAC-2 

ADPAC-3 

CSC 

FAA 

FOCC-1 

FOCC-2 

HAM 

NAVC-1 

NAVC-2 

NAVC-3 

NCDCF 

NEL 

NMCSSC 

RADC-1 

RADC-2 

RADC-3 

RADC-4 

SAC-1 

SAC-2 

SAC-3 

SAC-4 

N(CFI)  = 


Compliance 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFID 

CFI 

CFI 

CFID 

CFID 

CFID 

CFID 

CFID 

16  N(CFID)  = 
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AFC  Reference:  A  4 


Usage 

.2474 

.6190 

.5227 

(N/A) 

.8 

.7831 

0 

.9090 

(N/C) 

.7142 

.6000 

.1600 

.3500 

.5714 

(N/C) 

9 

.0062 

.2857 

.0184 

.0293 

.0155 

.0184 

N(CFNl)  =  0 


RESOLUTION  ANALYSIS 


JAQ  Reference:  J  3. 5. 1.1. 5 

Feature  Name:  ITEM  TYPE  FIXED  POINT  -  Scale  in 

Resolution  Inequality:  U  GQ  T1  =  .02 

Resolution  Equation:  U  =  Q23/Q22 

Number  of  users  with  usage  rates:  GO  T1  =  16 

Resolution:  Retain  as  nucleus 

Data: 

Application 


ADPAC-1 

ADPAC-2 

ADPAC-3 

CSC 

FAA 

FOCC-1 

FOCC-2 

HAM 

NAVC-1 

NAVC-2 

NAVC-3 

NCDCF 

NEL 

NMCSSC 

RADC-1 

RADC-2 

RADC-3 

RADC-4 

SAC-1 

SAC-2 

SAC-3 

SAC-4 

N(CFl)  = 


CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

N(CF1D)=  0 
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AFC  Reference:  ^  ^ 
Declaration  Blank  or  Zero 


Usage 

(N/C) 

.7692 

.6521 

(N/A) 

0 

1 

0 

1.166 

(N/C) 

0 

1 

0 

.0285 

.6666 

(N/C) 

.9 

1 

.4166 

0 

1.156 

.1666 

0 

N(CFNI)=  0 


RESOLUTION  ANALYSIS 


JAQ  Reference: 

J  3. 5.1. 1.8 

AFC  Reference: 

Feature  Name: 

RANGE  ATTRIBUTE 

Resolution  Inequality: 

U  GQ  T1  =  .10 

Resolution  Equation: 

U  =  Q34/(Q18  +  Q22) 

Number  of  users  with  usage  rates:  GQ  T1  =  0 

Resolution: 

Delete 

Data: 

Application 

Compliance 

Usage 

ADPAC-1 

CFNI 

0 

ADPAC-2 

CFNI 

0 

ADPAC-3 

CFNI 

0 

CSC 

CFI 

(N/A) 

FAA 

CFNI 

0 

FOCC-1 

CFNI 

0 

FOCC-2 

CFNI 

0 

HAM 

CFNI 

0 

NAVC-1 

CFNI 

(N/C) 

NAVC-2 

CFNI 

0 

NAVC-3 

CFNI 

0 

NCDCF 

CFNI 

0 

NEL 

CFNI 

0 

NMCSSC 

CFNI 

0 

RADC-1 

CFID 

(N/C) 

RADC-2 

CFNI 

0 

RADC-3 

CFNI 

0 

RADC-4 

CFI 

0 

SAC-1 

CFNI 

0 

SAC-2 

CFNI 

0 

SAC-3 

CFNI 

0 

SAC-4 

CFNI 

0 

N(CFI)=  2  N(CFID)=  1  N(CFNi)  =  19 
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JAQ  Reference:  J  3. 5. 1.1. 9  AFC  Reference;  A  4.4 

Feature  Name:  ITEM  TYPE  FLOATING  POINT 

Resolution  Inequality;  N/A 

Resolution  Equation:  U  =  Q38/(Q18  +  Q22  +  Q38) 

Number  of  users  with  usage  rates:  GQ  T1  =  N/A 

Resolution:  Accept  os  nucleus 

Data: 


Application 

ADPAC-1 

ADPAC-2 

ADPAC-3 

CSC 

FAA 

FOCC-1 

FOCC-2 

HAM 

NAVC-1 

NAVC-2 

NAVC-3 

NCDCF 

NEL 

NMCSSC 

RADC-1 

RADC-2 

RADC-3 

RADC-4 

SAC-1 

SAC-2 

SAC-3 

SAC -4 


Compliance  Usage 

CFI  0 

CFI  .2380 

CFI  0 

CFI  (N/A) 

CFI  .9 

CFI  .1204 

CFI  0 

CFI  .0606 

CFI  (N/C) 

CFI  0 

CFI  .3000 

CFI  .0400 

CFI  .1500 

CFI  .3809 

CFI  (N/C) 

CFI  .2 

CFI  0 

CFI  0 

CFI  .0276 

CFI  .0915 

CFI  .0194 

CFI  .0245 

N(CFI)=  22  N(CFID)=  ^  N(CFNI)  =  ^ 
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RESOLUTION  ANALYSIS 


JAQ  Reference: 
Feature  Name: 
Resolution  Inequality: 
Resolution  Equation: 


J  3. 5. 1.1. 6 
SIGN  ATTRIBUTE 
U  GE  T1  =  .01 
U  =  026/(018  +  022) 


AFC  Reference:  A  4.4 


Number  of  users  with  usage  rotes: 
Resolution: 

Data: 

Application 
ADPAC-1 
ADPAC-2 
ADPAC-3 
CSC 
FAA 
FOCC-1 
FOCC-2 
HAM 
NAVC-1 
NAVC-2 
NAVC-3 
NCDCF 
NEL 

NMCSSC 
RADC-1 
RADC-2 
RADC-3 
RADC-4 
SAC-1 
SAC-2 
SAC-3 
SAC-4 


GO  T1  =  14 

Retain  as  nucleus  (Note:  Usage  data  refers  to  "signed"  items) 

Usage 


Compliance 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 


N(CFI)  =  22 


N(CFID)  =  0 


.M 

.03 

.05 

(N/A) 

.02 

1.095 

.M 

.004 

(N/C) 

0 

1 

.008 

.03 

.01 

(N/C) 

.03 

.09 

.01 

.02 

.008 

.003 

.02 

N(CFNI)=  0 
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RESOLUTION  ANALYSIS 


JAQ  Reference: 

J  3. 5.2. 3. 2 

AFC  Reference: 

Feature  Name: 

PREFIX  +  AND  - 

Resolution  Inequality: 

U  GQ  T1  =  1 

Resolution  Equation: 

U  =  Q177 

Number  of  users  with  usage  rates:  gq  T1  =  13 

Resolution: 

Data: 

Retain  as  nucleus  (Note 

modification  of  precedence 

Application 

Compliance 

Usage 

ADPAC-1 

CFI 

0 

ADPAC-2 

CFI 

0 

ADPAC-3 

CFI 

2 

CSC 

CFI 

(N/A) 

FAA 

* 

(N/C) 

FOCC-1 

CFI 

30 

FOCC-2 

CFI 

0 

HAM 

CFI 

55 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

20 

NAVC-3 

CFI 

15 

NCDCF 

CFI 

5 

NEL 

CFI 

3 

NMCSSC 

CFID 

10 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFNI 

0 

RADC-3 

CFI 

0 

RADC-4 

CFI 

20 

SAC-1 

CFID 

140 

SAC-2 

CFID 

9000 

SAC-3 

CFID 

64 

SAC -4 

CFID 

1300 

N(CFI)=  15  N(CFID)=  5  N(CFNl)  =  1 


^Misprinted  page  in  JAQ  made  it  impossible  for  FAA  to  respond. 
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RESOLUTION  ANALYSIS 


JAQ  Reference:  J  3. 5.  2. 3. 3 

Feature  Name:  EXPONENTIATION  OPERATOR 


Resolution  Inequality: 

N/A 

Resolution  Equation: 

N/A 

Number  of  users  with  usage  rates: 

GO  Tl  =  N/A 

Resolution:  Accept  as 

Nucleus 

Data: 

Application 

Compliance 

ADPAC-l 

CFI 

ADPAC-2 

CFI 

ADPAC-3 

CFI 

CSC 

CFI 

FAA 

CFID 

FOCC-1 

CFI 

FOCC-2 

CFI 

HAM 

CFID 

NAVC-1 

CFI 

NAVC-2 

CFI 

NAVC-3 

CFI 

NCDCF 

CFI 

NEL 

CFI 

NMCSSC 

CFID 

RADC-1 

CFI 

RADC-2 

CFID 

RADC-3 

CFI 

RADC-4 

CFI 

SAC-1 

CFID 

SAC-2 

CFID 

SAC-3 

CFID 

SAC -4 

CFID 

N(CFI)=  14  N(CFID)  = 
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AFC  Reference:  A  4.5 


Usage 


8  N(CFNI)  =  0 


RESOLUTION  ANALYSIS 


JAQ  Reference:  J3.5.2.3.3 

AFC  Reference:  A  4.6 

Feature  Name:  EXPONENTIATION  NOTATION  -  ( 

:*  *) 

Resolution  Inequality:  U  G  Q  T1  =1 

Resolution  Equaltion:  U  -  Q181 

Number  of  users  with  usage  rates:  G  Q  T1  =10 

Resolution:  Delete 

Data: 

Note:  Because  of  an  oversight  in  the 
preparation  of  the  JAQ,  insufficient 
information  regarding  the  use  of  exponen¬ 
tiation  operators  was  obtained.  We  are 
recommending  that  (*  *)  be  dropped, 
since  **  is  widely  used  in  other  high 
level  languages,  and  since  only  one 
operator  is  required. 

Application 

Compliance 

Usage 

ADPAC-1 

CFI 

3 

ADPAC-2 

CFI 

0 

ADPAC-3 

CFI 

0 

CSC 

CFI 

(N/A) 

FAA 

CFI 

1  or  more 

FOCC-1 

CFI 

5 

FOCC-2 

CFI 

0 

HAM 

CFNI 

0 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

5 

NAVC-3 

CFI 

0 

NCDCF 

CFI 

2 

NEL 

CFI 

20 

NMCSSC 

CFNI 

0 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFNI 

0 

RADC-3 

CFI 

5 

RADC-4 

CFI 

0 

SAC-1 

CFI 

20 

SAC-2 

CFI 

225 

SAC-3 

CFI 

15 

SAC -4 

CFI 

20 

N(CFI)  =  19  N(CFID) 

=  0  N(CFNI)  =  3 
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JAQ  Reference:  J  3. 5. 2. 3. 4  AFC  Reference:  A  4.7 

Feature  Name:  Absolute  Value  Operator 

Resolution  Inequality:  N/A 

Resolution  Equation:  N/A 

Number  of  users  with  usage  rates;  GQ  T1  =  N/A 

Resolution:  Retain  as  optional 


Usage 


Data: 

Application 

CompI 

ADPAC-1 

CFID 

ADPAC-2 

CFID 

ADPAC-3 

CFID 

CSC 

CFI 

FAA 

CFID 

FOCC-1 

CFI 

FOCC-2 

CFI 

HAM 

CFI 

NAVC-1 

CFI 

NAVC-2 

CFI 

NAVC-3 

CFI 

NCDCF 

CFI 

NEL 

CFI 

NMCSSC 

CFID 

RADC-1 

CFI 

RADC-2 

CFID 

RADC-3 

CFI 

RADC-4 

CFI 

SAC-1 

CFID 

SAC-2 

CFID 

SAC-3 

CFID 

SAC-4 

CFID 

Note:  Owing  to  an  oversight  in  the 
preparation  of  the  JAQ,  insufficient 
data  regarding  use  of  absolute  value 
operator  were  solicited.  In  the 
interests  of  being  fair,  we  have 
declared  this  feature  as  optional. 


N(CFID)=  10 


N(CFI)=  12 
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RESOLUTION  ANALYSIS 


JAQ  Reference;  J  3. 5. 2. 3. 4  AFC  Reference:  A  4.8 

Feature  Name:  ABSOLUTE  VALUE  NOTATION  -  (/  /) 

Resolution  Inequality:  N/A 

Resolution  Equation;  Q185 

Number  of  users  with  usage  rates:  GE  T1  =  N/A 

Resolution:  Delete  Basis  of  Resolution;  Only  one  notation  for  absolute 

value  is  required.  The  number  of  application  which  do  not 
Data:  implement  (/  /)  or  which  have  0  usage  is  15.  Therefore  (/  /) 

is  dropped  in  favor  of  ABS. 


Application 

Compliance 

Usage 

ADPAC-1 

CFNI 

0 

ADPAC-2 

CFNI 

0 

ADPAC-3 

CFNI 

0 

CSC 

CFI 

(N/A) 

FAA 

CFNI 

0 

FOCC-1 

CFI 

0 

FOCC-2 

CFI 

0 

HAM 

CFI 

0 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

5 

NAVC-3 

CFI 

2 

NCDCF 

CFI 

0 

NEL 

CFI 

0 

NMCSSC 

CFI 

20 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFI 

1  or  more 

RADC-3 

CFI 

0 

RADC-4 

CFI 

0 

SAC-1 

CFNI 

0 

SAC-2 

CFNI 

0 

SAC-3 

CFNI 

0 

SAC -4 

CFNI 

0 

N(CFI)  =  14  N(CFID)  =  0  N(CFNI)=8 
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JAQ  Reference:  J  3. 5. 4. 9 
Feature  Name:  REM 

Resolution  Inequality:  U  GO  T1  =  .05 
Resolution  Equation:  U  =  Q265/Q18 

Number  of  users  with  usage  rotes:  GO  T1  =  0 
Resolution:  Delete 

Data: 

Applicati  on 


ADPAC-1 

ADPAC-2 

ADPAC-3 

CSC 

FAA 

FOCC-1 

FOCC-2 

HAM 

NAVC-1 

NAVC-2 

NAVC-3 

NCDCF 

NEL 

NMCSSC 

RADC-1 

RADC-2 

RADC-3 

RADC-4 

SAC-1 

SAC-2 

SAC-3 

SAC-4 

N(CFl)  = 


CFNI 

CFNl 

CFNI 

CFI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

N(CF1D)=  0 


AFC  Reference:  A  4.9 


Usage 

0 

0 

0 

(N/A) 

0 

0 

0 

0 

(N/C) 

0 

0 

0 

0 

0 

(N/C) 

0 

0 

0 

0 

0 

0 

0 

N(CFNl)  =  21 
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JAQ  Reference:  J3.5.4.7  AFC  Reference:  A  4.9 

Feature  Name:  REMQUO 

Resolution  Inequality:  U  GO  T1  =  .05 

Resolution  Equation:  U  =  Q257/Q18 

Number  of  users  with  usage  rotes:  GO  T1  =  7 

Resolution:  Delete 

Data: 


Applicati  on 

ComplI 

ADPAC-1 

CFI 

ADPAC-2 

CFI 

ADPAC-3 

CFI 

CSC 

CFI 

FAA 

CFI 

FOCC-1 

CFID 

FOCC-2 

CFID 

HAM 

CFI 

NAVC-1 

CFI 

NAVC-2 

CFI 

NAVC-3 

CFI 

NCDCF 

CFNI 

NEL 

CFNI 

NMCSSC 

CFNI 

RADC-1 

CFNI 

RADC-2 

CFNI 

RADC-3 

CFNI 

RADC-4 

CFNI 

SAC-1 

CFID 

SAC-2 

CFID 

SAC-3 

CFID 

SAC-4 

CFID 

Usage 
.001 
0 

.009 
(N/A) 

.08 
0 
0 

.05 

(N/C) 

0 
0 
0 
0 
0 

(N/C) 

0 

.01 

0 

.001 
.003 
.001 
.001 

N(CFID)=  6  N(CFNI)=  7 


N(CFI)=  9 
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JAQ  Reference:  J  3. 5. 1.1. 7 
Feature  Name:  ITEM  TYPE  DUAL 

Resolution  Inequality;  U  GO  T1  =  .10 
Resolution  Equation:  U  =  Q30/Q14 

Number  of  users  with  usage  rotes;  GO  T1  =  0 
Resolution:  Delete 

Data: 

Application 


ADPAC-1 

ADPAC-2 

ADPAC-3 

CSC 

FAA 

FOCC-1 

FOCC-2 

HAM 

NAVC-1 

NAYC-2 

NAVC-3 

NCDCF 

NEL 

NMCSSC 

RADC-1 

RADC-2 

RADC-3 

RADC-4 

SAC-1 

SAC-2 

SAC-3 

SAC-4 

N(CFI)  = 


Compliance 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

1  N(CFID)  = 


AFC  Reference:  A  5 


Usage 

0 

0 

0 

(N/A) 

0 

0 

0 

0 

(N/C) 

0 

0 

0 

0 

0 

(N/C) 

0 

0 

0 

0 

0 

0 

0 

0  N(CFNI)=  21 
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JAQ  Reference;  J  3. 5. 2. 4 

Feature  Name:  DUAL  FORMULAS 

Resolution  Inequality:  U  GQ  T1  =  0 

Resolution  Equation:  U  =  Q193/Q14 

Number  of  users  with  usage  rates:  GQ  T1  =  T2  =  0 
Resolution:  Delete 

Data: 

AFC  Reference; 

Application 

Compliance 

Usage 

ADPAC-1 

CFNI 

0 

ADPAC-2 

CFNI 

0 

ADPAC-3 

CFNI 

0 

CSC 

CFNI 

(N/A) 

FAA 

CFNI 

0 

FOCC-1 

CFNI 

0 

FOCC-2 

CFNI 

0 

HAM 

CFNI 

0 

NAVC-1 

CFNI 

(N/C) 

NAVC-2 

CFNI 

0 

NAVC-3 

CFNI 

0 

NCDCF 

CFNI 

0 

NEL 

CFNI 

0 

NMCSSC 

CFNI 

0 

RADC-1 

CFNI 

(N/C) 

RADC-2 

CFNI 

0 

RADC-3 

CFNI 

0 

RADC-4 

CFNI 

0 

SAC-1 

CFNI 

0 

SAC-2 

CFNI 

0 

SAC-3 

CFNI 

0 

SAC-4 

CFNI 

0 

N(CF1)=  0  N(CFID)=  0  N(CFNI)  = 


22 
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JAQ  Reference: 

J  3.5.2.7  AFC  Reference:  A6.1 

Feature  Name: 

RELATIONAL  FORMULAS  (excluding  "Chained") 

Resolution  Inequality:  N/A 

Resolution  Equation:  N/A 

Number  of  users  with  usage  rates:  GQ  T1  =  N/A 


Resolution: 

Accept  as  nucleus 

Data: 

Application 

ADPAC-1 

Compliance  Usage 

CFI 

ADPAC-2 

CFI 

ADPAC-3 

CFI 

CSC 

CFI 

FAA 

CFI 

FOCC-1 

CFI 

FOCC-2 

CFI 

HAM 

CFI 

NAVC-1 

CFI 

NAVC-2 

CFI 

NAVC-3 

CFI 

NCDCF 

CFI 

NEL 

CFID 

NMCSSC 

CFID 

RADC-1 

CFI 

RADC-2 

CFID 

RADC-3 

CFI 

RADC-4 

CFI 

SAC-1 

CFID 

SAC-2 

CFID 

SAC-3 

CFID 

SAC-4 

CFID 

N(CFI)=  15  N(CFID)=7  N(CFNI)  =  0 
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JAQ  Reference: 

J  3. 5. 2. 7 

AFC  Reference: 

Feature  Name: 

"CHAINED"  RELATIONAL  FORMULAS 

Resolution  Inequality:  (j  GO  77  =  1 

Resolution  Equation:  (j  =  Q205 

Number  of  users 

with  usage  rates:  GO  T1  =9 

Resolution: 

Retain  as  optional 

Data: 

Application 

Compliance 

Usage 

ADPAC-1 

CFI 

37 

ADPAC-2 

CFI 

15 

ADPAC-3 

CFI 

0 

CSC 

CFI 

(N/A) 

FAA 

CFI 

1  or  more 

FOCC-1 

CFI 

10 

FOCC-2 

CFI 

0 

HAM 

CFI 

0 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

5 

NAVC-3 

CFI 

0 

NCDCF 

CFI 

0 

NEL 

CFNI 

0 

NMCSSC 

CFNI 

0 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFNI 

0 

RADC-3 

CFI 

10 

RADC-4 

CFI 

0 

SAC-1 

CFI 

100 

SAC-2 

CFI 

700 

SAC -3 

CFI 

540 

SAC-4 

CFI 

600 

N(CFI)=  19  N(CF1D)=  0  N(CFNI) 


A6.2 
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RESOLUTION  ANALYSIS 

JAQ  Reference:  J  3.5. 2.8  AFC  Reference:  A  7.1 

Feature  Name:  BOOLEAN  FORMULAS  —  with  AND,  OR,  NOT 


Resolution  Inequality: 

U  GO  T1 

=  1 

Resolution  Equation: 

U  =  0209 

Number  of  users  with  usage  rotes: 

GO  T1  =  15 

Resolution:  Retain 

as  nucleus 

Data: 

Application 

Compliance 

Usage 

ADPAC-1 

CFI 

18 

ADPAC-2 

CFI 

15 

ADPAC-3 

CFI 

0 

CSC 

CFI 

(N/A) 

FAA 

CFI 

0 

FOCC-1 

CFI 

500 

FOCC-2 

CFI 

15 

HAM 

CFI 

300 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

10 

NAVC-3 

CFI 

20 

NCDCF 

CFI 

20 

NEL 

CFI 

30 

NMCSSC 

CFI 

700 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFI 

1  or  more 

RADC-3 

CFI 

400 

RADC-4 

CFI 

0 

SAC-1 

CFI 

1480 

SAC-2 

CFI 

7000 

SAC-3 

CFI 

1700 

SAC-4 

CFI 

8050 

N(CFI)=  21  N(CFID)=  0  N(CFNI)  =  0 
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JAQ  Reference:  J  3.5.1.1.12 

Feature  Name:  ITEM  TYPE  BOOLEAN 

Resolution  Inequality:  U  GO  T1  =  .02 

Resolution  Equation:  U  =  Q54/Q14 

Number  of  users  with  usage  rates:  GO  T1  =  8 

Resolution:  Retain  as  nucleus 

Data: 

AFC  Reference: 

Application 

Compliance 

Usage 

ADPAC-1 

CFI 

.0500 

ADPAC-2 

CFI 

.1083 

ADPAC-3 

CFI 

.2380 

CSC 

CFI 

(N/A) 

FAA 

CFNI 

0 

FOCC-1 

CFI 

.0480 

FOCC-2 

CFI 

0 

HAM 

CFNI 

0 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

.0500 

NAVC-3 

CFI 

.0050 

NCDCF 

CFI 

.2000 

NEL 

CFID 

.0100 

NMCSSC 

CFI 

.3333 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFI 

.2 

RADC-3 

CFI 

0 

RADC-4 

CFI 

0 

SAC-1 

CFNI 

0 

SAC-2 

CFNI 

0 

SAC-3 

CFNI 

0 

SAC-4 

CFNI 

0 

N(CFI)=  15  N(CFID)=  1  N(CFNI)  =  6 
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JAQ  Reference:  J  3.5.3. 1  AFC  Reference:  A  8 

Feature  Name:  NUMERIC  ITEM  TYPE  CONVERSION  IN  THE  ASSIGNMENT  STATEMENT 


Resolution  Inequality: 

U  GO  T1 

=  .01 

Resolution  Equation: 

U  =  021 3/021 7A 

Number  of  users  with  usage  rates: 

GO  T1  =  12 

Re  sol  ut  i  on :  Acce  pt 

as  nucleus 

Data: 

Application 

Compliance 

Usage 

ADPAC-1 

CFI 

(N/C) 

ADPAC-2 

CFI 

.0428 

ADPAC-3 

CFI 

0 

CSC 

CFI 

(N/A) 

FAA 

CFID 

.2 

FOCC-1 

CFI 

.0125 

FOCC-2 

CFI 

.0500 

HAM 

CFID 

.0600 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

.6000 

NAVC-3 

CFI 

0 

NCDCF 

CFI 

.0500 

NEL 

CFI 

.0350 

NMCSSC 

CFI 

.2000 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFID 

.2 

RADC-3 

CFI. 

.0083 

RADC-4 

CFI 

.0250 

SAC-1 

CFID 

.0018 

SAC-2 

CFID 

.0700 

SAC-3 

CFID 

.0014 

SAC-4 

CFID 

.0023 

N(CFI)=  15  N(CFID)=  7  N(CFNI)  =  0 
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JAQ  Reference:  J  3.5.3. 1  AFC  Reference:  AS 

Feature  Name:  BOOLEAN  ASSIGNMENT  STATEMENT 


Resolution  Inequality;  N/A 

Resolution  Equation:  U  =  Q217/Q217A 

Number  of  users  with  usage  rates:  GO  T1  =  N/A 

Resolution:  Retain  as  nucleus 

Data: 

Application  Compliance 

Usage 

ADPAC-1 

CFI 

(N/C) 

ADPAC-2 

CFI 

0 

ADPAC-3 

CFI 

0 

CSC 

CFI 

(N/A) 

FAA 

CFID 

0 

FOCC-1 

CFI 

0 

FOCC-2 

CFI 

0 

HAM 

CFID 

0 

NAVC-1 

CFI 

(N/C 

NAVC-2 

CFI 

0 

NAVC-3 

CFI 

0 

NCDCF 

CFI 

0125 

NEL 

CFI 

.0025 

NMCSSC 

CFI 

.2000 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFID 

0 

RADC-3 

CFID 

0 

RADC-4 

CFID 

0 

SAC-1 

CFID 

0 

SAC-2 

CFID 

0 

SAC-3 

CFID 

0 

SAC-4 

CFID 

0 

N(CFI)=  14  N(CFID)=  7  N(CFNI)  =  0 
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JAQ  Reference:  J  3. 5. 1.6.1 

Feature  Name:  ITEM  PRESET 

Resolution  Inequality:  U  GO  T1  =  .02 

Resolution  Equation;  U  =  0113/014 

Number  of  users  with  usage  rates:  GO  T1  =  13 

Resolution;  Retain  os  nucleus 

Data: 


Applicotl  on 

ADPAC-1 

ADPAC-2 

ADPAC-3 

CSC 

FAA 

FOCC-1 

FOCC-2 

HAM 

NAVC-1 

NAVC-2 

NAVC-3 

NCDCF 

NEL 

NMCSSC 

RADC-1 

RADC-2 

RADC-3 

RADC-4 

SAC-1 

SAC-2 

SAC-3 

SAC -4 


Compli 


once 


CFI 

CFI 

CFI 

CFI 

CFNI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFNI 

CFNI 

CFNI 

CFNI 


AFC  Reference;  A  8.1 


Usage 

.1714 

.0416 

.3809 

(N/A) 

0 

.0720 

.6000 

0 

(N/C) 
.1000 
.0650 
.0400 
.0400 
1 .333 
(N/C) 
2 

.1500 

.3738 

0 

0 

0 

0 


N(CFI)=  17  N(CFID)=  0  N(CFNI)  =  5 
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JAQ  Reference:  J  3. 5. 1.6. 2 

Feature  Name:  TABLE  PRESET 

Resolution  Inequality:  U  GO  T  =  .02 

Resolution  Equation:  U  =  Q1 16/078 

Number  of  users  with  usage  rates:  GO  T1  =  16 

Resolution:  Retain  as  nucleus 

Data: 

AFC  Reference:  A 

Application 

Compliance 

Usage 

ADPAC-1 

CFI 

.1315 

ADPAC-2 

CFI 

.1875 

ADPAC-3 

CFI 

0 

CSC 

CFI 

(N/A) 

FAA 

CFI 

.2 

FOCC-1 

CFI 

.4347 

FOCC-2 

CFI 

.5000 

HAM 

CFI 

0 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

.3333 

NAVC-3 

CFI 

0 

NCDCF 

CFI 

.1000 

NEL 

CFI 

.3333 

NMCSSC 

CFI 

.2000 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFID 

.2 

RADC-3 

CFI 

2.000 

RADC-4 

CFI 

.0777 

SAC-1 

CFID 

.3333 

SAC-2 

CFID 

1 

SAC-3 

CFID 

.1061 

SAC-4 

CFI 

.1088 

N(CFI)=  18 

N(CFID)  = 
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JAQ  Reference:  J  3. 5. 1.6. 3 

Feature  Name:  ARRAY  PRESET 

Resolution  Inequality:  U  GO  T1  =  .02 

Resolution  Equation:  U  ==  0120/ Q74 

AFC  Reference:  A 

Number  of  users  with  usage  rotes: 

GO  T1 

=  2 

Resolution:  Retain  os  option  —  Must  be  im 

Data: 

plemented  if  ARRAY  is  implemented 

Application 

Compliance  Usage 

ADPAC-l 

CFI 

0 

ADPAC-2 

CFI 

0 

ADPAC-3 

CFI 

0 

CSC 

CFI 

(N/A) 

FAA 

CFNI 

0 

FOCC-1 

CFNI 

0 

FOCC-2 

CFNI 

0 

HAM 

CFNI 

0 

NAVC-1 

CFNI 

(N/C) 

NAVC-2 

CFNI 

(N/C) 

NAVC-3 

CFNI 

0  . 

NCDCF 

CFNI 

0 

NEL 

CFI 

.3000 

NMCSSC 

CFNI 

0 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFNI 

0 

RADC-3 

CFI 

1 .000 

RADC-4 

CFI 

0 

SAC-1 

CFNI 

0 

SAC-2 

CFNI 

0 

SAC-3 

CFNI 

0 

SAC-4 

N(CFI)=  7 

CFNI 

0 

N(CFID)=  0  N(CFNI) 
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JAQ  Reference:  J  3. 5. 1.6. 4 

Feature  Name:  STRING  PRESET 

Resolution  Inequality:  U  GO  T1  =  .02 

Resolution  Equation:  U  =  Q124/Q103 

Number  of  users  with  usage  rates:  GOT!  =  0 
Resolution:  Delete 


Data:  Note:  STRING  is  deleted. 


Application 

ADPAC-1 

ADPAC-2 

ADPAC-3 

CSC 

FAA 

FOCC-1 

FOCC-2 

HAM 

NAVC-1 

NAVC-2 

NAVC-3 

NCDCF 

NEL 

NMCSSC 

RADC-1 

RADC-2 

RADC-3 

RADC-4 

SAC-1 

SAC-2 

SAC-3 

SAC-4 


Compliance 

CFNI 

CFNI 

CFNI 

CFI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 


AFC  Reference:  A  8.1 


Usage 

0 

0 

0 

(N/A) 

0 

(N/C) 

0 

0 

(N/C) 

0 

0 

0 

0 

0 

(N/C) 

0 

0 

0 

0 

0 

0 

0 


N(CFI)=  1  N(CFID)=  0  N(CFNI)=  21 
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JAQ  Reference: 

J  3.5.1.1.10 

AFC  Reference:  A  8.2 

Feature  Name: 

ROUNDED  NUMERIC  ASSIGNMENT 

—  Round  Attribute 

Resolution  Inequality: 

Resolution  Equation: 

Number  of  users  with 

Resolution:  Delete 

UGQT1  =  .05 

U  =  042/(018  +  022  +  038) 
usage  rates:  GO  T1  =0 

Note:  Extended  Numeric  Round  (3.2.2.14)  is  made  optional. 

Data: 

Application 

Compliance 

Usage 

ADPAC-1 

CFNI 

0 

ADPAC-2 

CFNI 

0 

ADPAC-3 

CFNI 

0 

CSC 

CFI 

(N/A) 

FAA 

CFNI 

0 

FOCC-1 

CFNI 

0 

FOCC-2 

CFNI 

0 

HAM 

CFNI 

0 

NAVC-1 

CFNI 

(N/C) 

NAVC-2 

CFNI 

0 

NAVC-3 

CFNI 

0 

NCDCF 

CFNI 

0 

NEL 

CFNI 

0 

NMCSSC 

CFNI 

0 

RADC-1 

CFNI 

(N/C) 

RADC-2 

CFNI 

0 

RADC-3 

CFNI 

0 

RADC-4 

CFI 

0 

SAC-1 

CFNI 

0 

SAC-2 

CFNI 

0 

SAC-3 

CFNI 

0 

SAC-4 

CFNI 

0 

N(CFI)=  2  N(CFID)=  0  N(CFNI)  =  20 
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RESOLUTION  ANALYSIS 


JAQ  Reference:  J  3. 5. 3. 2 

Feature  Name:  EXCHANGE  STATEMENT 

Resolution  Inequality:  U  GQ  T1  =  .01 

Resolution  Equation:  U  =  Q221/Q217A 

Number  of  users  with  usage  rates:  GO  T1  =  3 

Resolution:  Retain  as  optional 

Data: 

Application  Compliance 

ADPAC-1  CFI 

ADPAC-2  CFI 

ADPAC-3  CFI 

CSC  CFI 

FAA  CFI 

FOCC-1  CFI 

FOCC-2  CFI 

HAM  CFI 

NAVC-1  CFI 

NAVC-2  CFI 

NAVC-3  CFI 

NCDCF  CFI 

NEL  CFI 

NMCSSC  CFI 

RADC-1  CFI 

RADC-2  CFI 

RADC-3  CFI 

RADC-4  CFI 

SAC-1  CFI 

SAC-2  CFI 

SAC-3  CFI 

SAC-4  CFI 


N(CFI)  =  22 


AFC  Reference:  A  8.3 


Usage 
(N/C) 

.0142 
0 

(N/A) 

.2 

.0012 
.0100 
0 

(N/C) 

0 

(N/C) 

.0025 
.0035 
.1000 
(N/C) 

.1 
0 

.0150 
.0030 
.0240 
.0158 
.0103 

N(CFID)=  0  N(CFNI)=  0 
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RESOLUTION  ANALYSIS 


JAQ  Reference:  J  3.5.4.2  AFC  Reference:  ^9. 

Feature  Name:  COMPUND  STATEMENT 

Resolution  Inequality:  N/A 

Resolution  Equation:  U  =  Q234 

Number  of  users  with  usage  rates:  GO  T1  =  N/A 

Resolution:  Accept  as  nucleus 

Data: 


Application 

Compliance 

Usage 

ADPAC-1 

CFI 

100 

ADPAC-2 

CFI 

55 

ADPAC-3 

CFI 

30 

CSC 

CFI 

(N/A) 

FAA 

CFI 

1  or  more 

FOCC-1 

CFI 

2000 

FOCC-2 

CFI 

200 

HAM 

CFI 

750 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

30 

NAVC-3 

CFI 

0 

NCDCF 

CFI 

40 

NEL 

CFI 

200 

NMCSSC 

CFI 

700 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFI 

1  or  more 

RADC-3 

CFI 

500 

RADC-4 

CFI 

100 

SAC-1 

CFI 

9360 

SAC-2 

CFI 

11,000 

SAC-3 

CFI 

4140 

SAC-4 

CFI 

17,500 

N(CFID)=  0  N(CFNI)=  0 


N(CFI)  =  22 
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JAQ  Reference:  J  3.5.5  AFC  Reference:  A  9.2 

Feature  Name:  GOTO  STATEMENT 

Resolution  Inequality:  N/A 

Resolution  Equation:  U  =  Q276 


Number  of  users  with  usage  rates: 

GO  T1  =  N/A 

Resolution: 

Accept  as  nucleus 

Note:  The  form  containing  a  subscript  is  implemented 

Data: 

only  if  Index  Switch  is  implemented. 

Application 

Compliance 

Usage 

ADPAC-1 

CFI 

0 

ADPAC-2 

CFI 

420 

ADPAC-3 

CFI 

33 

CSC 

CFI 

(N/A) 

FAA 

CFI 

1  or  more 

FOCC-1 

CFI 

0 

FOCC-2 

CFI 

100 

HAM 

CFI 

250 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

100 

NAVC-3 

CFI 

250 

NCDCF 

CFI 

60 

NEL 

CFI 

400 

NMCSSC 

CFI 

200 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFI 

1  or  more 

RADC-3 

CFI 

1000 

RADC-4 

CFI 

40 

SAC-1 

CFI 

10080 

SAC-2 

CFI 

28,000 

SAC-3 

CFI 

5708 

SAC-4 

CFI 

7120 

N(CFI)  =  22 

N(CFID)  = 

0  N(CFNl)  =  0 
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JAQ  Reference:  J  3. 5. 5. 7 

AFC  Reference: 

Feature  Name:  STOP 

Resolution  Inequality:  U  GO  T1 

=  1 

Resolution  Equation:  U  =  Q319 

Number  of  users  with  usage  rates: 

GO  T1  =9 

Resolution:  Retain  as  nucleus 

^o^te_;  Modification  in  3.2.2.12 

Application 

Compliance 

Usage 

ADPAC-1 

CFI 

n 

ADPAC-2 

CFI 

0 

ADPAC-3 

CFI 

0 

CSC 

CFID 

(N/A) 

FAA 

CFID 

1  or  more 

FOCC-1 

CFI 

0 

FOCC-2 

CFI 

0 

HAM 

CFI 

7 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

0 

NAVC-3 

CFI 

0 

NCDCF 

CFNI 

0 

NEL 

CFID 

15 

NMCSSC 

CFI 

10 

RADC-1 

CFID 

(N/C) 

RADC-2 

CFNI 

0 

RADC-3 

CFID 

1 

RADC-4 

CFID 

0 

SAC-1 

CFID 

220 

SAC-2 

CFID 

10 

SAC-3 

CFID 

160 

SAC-4 

CFI 

80 

N(CFI)=  n  N(CFID)=  9  N(CFNI)  =  2 
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JAQ  Reference:  J  3.5.5.7  AFC  Reference;  ^9. 

Feature  Name:  STOP  Statement  Label  (Pausing) 

Resolution  Inequality:  U  GQ  T1  =  1 

Resolution  Equation:  U  =  Q318 

Number  of  users  with  usage  rates:  GQ  T1  =  1 

Resolution:  Delete 

^te:  Pause  statement  in  3.2.2.13 


Application 

Compliance 

U--ge 

ADPAC-1 

CFI 

0 

ADPAC-2 

CFI 

0 

ADPAC-3 

CFI 

0 

CSC 

CFID 

(N/A) 

FAA 

CFID 

1  or  more 

FOCC-1 

CFI 

0 

FOCC-2 

CFI 

0 

HAM 

CFI 

0 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

0 

NAVC-3 

CFI 

0 

NCDCF 

CFNI 

0 

NEL 

CFID 

5 

NMCSSC 

CFI 

0 

RADC-1 

CFID 

(N/C) 

RADC-2 

CFNI 

0 

RADC-3 

CFID 

0 

RADC-4 

CFID 

0 

SAC-1 

CFID 

0 

SAC-2 

CFID 

0 

SAC-3 

CFID 

0 

SAC-4 

CFI 

0 

N(CFI)=  11  N(CFID)=  9  N(CFNI)  = 
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JAQ  Reference:  J  3.5.5.3 
Feature  Name:  |p  STATEMENT 

Resolution  Inequality:  N/A 

AFC  Reference: 

Resolution  Equation:  (j  =  Q29 1/(0291  +  Q295  +  Q284  +  Q280) 

Number  of  users  with  usage  rates:  qq  71  =  n//^ 

Resolution:  Accept  as  nucleus 

Data: 

Application 

Compliance 

Usage 

ADPAC-1 

CFI 

.9742 

ADPAC-2 

CFI 

.9090 

ADPAC-3 

CFI 

.9756 

CSC 

CFI 

(N/A) 

FAA 

CFI 

.9 

FOCC-1 

CFI 

.9615 

FOCC-2 

CFI 

.8196 

HAM 

CFI 

.9615 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

.9708 

NAVC-3 

CFI 

.9708 

NCDCF 

CFI 

.6250 

NEL 

CFI 

.9523 

NMCSSC 

CFI 

.7407 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFI 

.9 

RADC-3 

CFI 

.9685 

RADC-4 

CFI 

1 

SAC-1 

CFI 

.9361 

SAC-2 

CFI 

.9529 

SAC-3 

CFI 

.9492 

SAC-4 

CFI 

.9906 

N(CFI)  =  22 

N(CFID)  = 

195 

0  N(CFNI) 

A9.4. 


RESOLUTION  ANALYSIS 


JAQ  Reference:  J  3. 5. 5. 4  AFC  Reference; 

Feature  Name:  IFEITH/ORIF  STATEMENT 

Resolution  Inequality:  U  GO  T1  =.02 

Resolution  Equation:  U  =  0295/(0291  +  Q295  +  Q284  +  Q280) 

Number  of  users  with  usage  rates:  GO  T1  =  7 

Resolution:  Retain  as  optional 

Data: 


Application 

Compliance 

Usage 

ADPAC-1 

CFI 

.0103 

ADPAC-2 

CFI 

.0363 

ADPAC-3 

CFI 

0 

CSC 

CFI 

(N/A) 

FAA 

CFNI 

0 

FOCC-1 

CFI 

.0384 

FOCC-2 

CFI 

.8196 

HAM 

CFI 

0 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

.0097 

NAVC-3 

CFI 

.0291 

NCDCF 

CFI 

.1250 

NEL 

CFI 

.0068 

NMCSSC 

CFI 

.1111 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFI 

.2 

RADC-3 

CFI 

.0169 

RADC-4 

CFI 

0 

SAC-1 

CFNI 

0 

SAC-2 

CFNI 

0 

SAC-3 

CFNI 

0 

SAC-4 

CFNI 

0 

N(CFID)=  0 


A9.4.2 


N(CFI)=  17 
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N(CFNI)=  5 


RESOLUTION  ANALYSIS 


JAQ  Reference: 

Feature  Name: 

Resolution  Inequality: 

Resolution  Equation: 

Number  of  users  with  usage  rates: 
Resolution:  Retain  as  optional 

Data: 

Application 
ADPAC-1 
ADPAC-2 
ADPAC-3 
CSC 
FAA 
FOCC-1 
FOCC-2 
HAM 
NAVC-1 
NAVC-2 
NAVC-3 
NCDCF 
NEL 

NMCSSC 
RADC-1 
i^DC-2 
RADC-3 
RADC-4 
SAC-1 
SAC-2 
SAC-3 
SAC-4 

N(CFl)  =  18 


0 

.0181 

0 

(N/A) 

.2 

0 

.1639 

.0192 

(N/C) 

.0097 

0 

.1250 

.0272 

.0740 

(N/C) 

.2 

.0096 

0 

.0036 

.0071 

.0187 

.0025 

N(CF1D)=  4  N(CFN1)=  0 


J3.5.5.2  AFC  Reference:  A  9.4.3 

INDEX  SWITCHES 
U  GQ  T1  =  .02 

U  =  Q284/(Q291  +  Q295  +  Q284  +  Q280) 

GQ  T1  =6 


Compliance  Usage 

CFI 
CFI 
CFI 
CFI 
CFI 
CFI 
CFI 

CFI 
CFI 
CFI 
CFI 
CFI 
CFI 
CFI 
CFI 


CFI 

CFI 

CFI 

CFID 

CFID 

CFID 

CFID 
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JAQ  Reference:  J  3. 5. 5. 2  AFC  Reference; 

Feature  Name;  SWITCH  NAMES  within  SWITCH  DECLARATIONS 


Resolution  Inequality:  U  GQ  T1  =  .05 

Resolution  Equation:  U  =  Q285/Q284 

Number  of  users  with  usage  rotes:  GQ  T1  =  1 

Resolution:  Delete 

Data: 

Application  Compliance 

Usage 

ADPAC-1 

CFI 

0 

ADPAC-2 

CFI 

0 

ADPAC-3 

CFI 

0 

CSC 

CFI 

(N/A) 

FAA 

CFI 

0 

FOCC-1 

CFI 

0 

FOCC-2 

CFI 

0 

HAM 

CFI 

0 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

0 

NAVC-3 

CFI 

0 

NCDCF 

CFI 

0 

NEL 

CFI 

0 

NMCSSC 

CFI 

0 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFI 

.  2 

RADC-3 

CFI 

0 

RADC-4 

CFI 

0 

SAC-1 

CFID 

0 

SAC-2 

CFID 

0 

SAC-3 

CFID 

0 

SAC-4 

CFID 

0 

N(CFI)=  18  N(CFID)=  4  N(CFNl) 


A  9.4.3 
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RESOLUTION  ANALYSIS 


JAQ  Reference:  j  3. 5. 5. 2 

AFC  Reference: 

Feafure  Name:  CLOSE  NAMES  wlfhln  Switch  Declarations 

Resolution  Inequality:  U  GO  T1  =  .05 

Resolution  Equation:  U  =  Q286/Q284 

Number  of  users  with  usage  rates:  GO  T1  =0 

Resolution:  Delete 

Data: 

Application 

Compliance 

Usage 

ADPAC-1 

CFI 

0 

ADPAC-2 

CFI 

0 

ADPAC-3 

CFI 

0 

CSC 

CFI 

(N/A) 

FAA 

CFI 

0 

FOCC-1 

CFI 

0 

FOCC-2 

CFI 

0 

HAM 

CFI 

0 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

0 

NAVC-3 

CFI 

0 

NCDCF 

CFI 

0 

NEL 

CFI 

0 

NMCSSC 

CFI 

0 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFI 

0 

RADC-3 

CFI 

0 

RADC-4 

CFI 

0 

SAC-1 

CFID 

0 

SAC-2 

CFID 

0 

SAC-3 

CFID 

0 

SAC-4 

CFID 

0 

N(CFI)  =  18 

N(CFID)  = 

4 

N(CFNI) 

A  9.4.3 
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RESOLUTION  ANALYSIS 


JAQ  Rcfcrsncc •  J3*5*5*l 

AFC  Reference: 

Feature  Name:  ITEM  SWITCH 

Resolution  Inequality:  U  GQ  T1  =  .01 

Resolution  Equation:  U  “  Q280/(Q291  Q295  +  Q284  +  Q280) 

Number  of  users  with  usage  rates: 
Resolution:  Retain  as  optional 

Data: 

Application 

GQ  T1  =  7 

Compliance 

Usage 

ADPAC-1 

CFI 

.5309 

ADPAC-2 

CFI 

.0363 

ADPAC-3 

CFI 

.0243 

CSC 

CFI 

(N/A) 

FAA 

CFI 

.2 

FOCC-1 

CFI 

0 

FOCC-2 

CFI 

.8196 

HAM 

CFI 

.0192 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

.0097 

NAVC-3 

CFI 

0 

NCDCF 

CFI 

.1250 

NEL 

CFI 

.0136 

NMCSSC 

CFI 

.0740 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFI 

.2 

RADC-3 

CFI 

w0048 

RADC-4 

CFI 

0 

SAC-1 

CFID 

.0602 

SAC-2 

CFID 

.0399 

SAC-3 

CFI 

.0319 

SAC-4 

CFI 

.0067 

N(CFI)=  18 

N(CFID)  = 

4 

N(CFNl) 
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JAQ  Reference:  J  3. 5. 5. 5  AFC  Reference:  A  9.5 

Feature  Name:  FOR  LOOP  -  One  Factor 

Resolution  Inequality:  U  GO  T1  =  .05 

Resolution  Equation:  U  =  Q299/(Q74  +  Q78  +  Q103) 

Number  of  users  with  usage  rotes:  GQ  T1  =  15 

Resolution:  Retain  os  nucleus 

Data: 


Application 

Compliance 

Usage 

ADPAC-1 

CFI 

2.289 

ADPAC-2 

CFI 

.0625 

ADPAC-3 

CFI 

0 

CSC 

CFI 

(N/A) 

FAA 

CFI 

.2 

FOCC-1 

CFI 

.1739 

FOCC-2 

CFI 

.2500 

HAM 

CFI 

.0625 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

.1333 

NAVC-3 

CFI 

0 

NCDCF 

CFI 

0 

NEL 

CFI 

.0750 

NMCSSC 

CFI 

.4000 

RADC-1 

CFID 

(N/C) 

RADC-2 

CFI 

.2 

RADC-3 

CFI 

12.90 

RADC-4 

CFI 

.0222 

SAC-1 

CFI 

2.976 

SAC-2 

CFI 

.2492 

SAC-3 

CFI 

.4751 

SAC-4 

CFI 

.4578 

N(CFI)=  21  N(CFID)=  1  N(CFNI)  =  0 
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JAQ  Reference: 
Feature  Name: 
Resolution  Inequality: 
Resolution  Equation: 


J  3. 5. 5. 5 

FOR  LOOP  -  Two  Factor 
U  GO  T1  =  .05 

U  =  0300/(074  +078  +0103) 


AFC  Reference: 


Number  of  users  with  usage  rotes:  GO  T1  -  17 
Resolution:  Retain  as  nucleus 


Data: 

Application 

ADPAC-1 

ADPAC-2 

ADPAC-3 

CSC 

FAA 

FOCC-1 

FOCC-2 

HAM 

NAVC-1 

NAVC-2 

NAVC-3 

NCDCF 

NEL 

NMCSSC 

RADC-1 

RADC-2 

RADC-3 

RADC-4 

SAC-1 

SAC-2 

SAC-3 

SAC-4 


Compliance 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFID 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 


Usage 

.0789 

.1875 

.6000 

(N/A) 

.2 

.6521 

.5000 

.3125 

(N/C) 

.0666 

0 

.0400 

.1000 

.2000 

(N/C) 

.7 

1.129 

.1666 

.1904 

.2419 

.7408 

.3421 


N(CFI)=  21  N(CFID)=  1  N(CFNl) 


A9.5 
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JAQ  Reference:  J  3. 5. 5. 5 

Feature  Name:  FOR  LOOP  -  Three  Factor 

Resolution  Inequality:  U  GQ  T1  =  .05 
Resolution  Equation:  U  =  Q30l/(Q74  +  Q78  +  Q103  ) 

Number  of  users  with  usage  rates:  GQ  T1  =  17 
Resolution:  Retain  as  nucleus 

Data: 

Application 


ADPAC-1 

ADPAC-2 

ADPAC-3 

CSC 

FAA 

FOCC-1 

FOCC-2 

HAM 

NAVC-] 

NAVC-2 

NAVC-3 

NCDCF 

NEL 

NMCSSC 

RADC-] 

RADC-2 

RADC-3 

RADC-4 

SAC-i 

SAC-2 

SAC-3 

SAC-4 

N(CFI)  = 


Compliance 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFID 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

21  N(CFID)=  1 
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AFC  Reference:  A9.5 


Usage 

0 

.6250 
1 .600 
(N/A) 

.9 

3.478 

1.250 

3.125 

(N/C) 

.6666 

0 

.4000 

.1750 

2.666 

(N/C) 

.9 

6.451 
1.222 
2.761 
.8211 
1 .754 
3.026 

N(CFN1)=  0 


RESOLUTION  ANALYSIS 


JAQ  Reference:  J  3. 5. 5. 5 

Feature  Name:  FOR  LOOP  -  Decrementing 

Resolution  Inequality:  U  GQ  T1  =  .05 

Resolution  Equation:  U  =  Q302/Q301 

Number  of  users  with  usage  rotes:  GO  T1  =  15 

Resolution:  Retain  os  nucleus 

Data: 

AFC  Reference: 

Application 

Compliance 

Usage 

ADPAC-1 

CFI 

(N/C) 

ADPAC-2 

CFI 

.1000 

ADPAC-3 

CFI 

.2500 

CSC 

CFI 

(N/A) 

FAA 

CFI 

.2 

FOCC-1 

CFI 

.0625 

FOCC-2 

CFI 

.6250 

HAM 

CFI 

.0200 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

.2000 

NAVC-3 

CFI 

0 

NCDCF 

CFI 

.2500 

NEL 

CFI 

.1428 

NMCSSC 

CFI 

.5000 

RADC-1 

CFID 

(N/C) 

RADC-2 

CFI 

.7 

RADC-3 

CFI 

.0500 

RADC-4 

CFI 

0 

SAC-1 

CFI 

.3809 

SAC-2 

CFI 

.0892 

SAC-3 

CFI 

.2405 

SAC-4 

CFI 

.1528 

N(CFID)=1  N(CFNI) 


A9.5 


N(CFI)  =  21 
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RESOLUTION  ANALYSIS 


JAQ  Reference:  J  3. 5. 5. 5. 6 

Feature  Nair«:  TEST  STATEMENT 

Resolution  Inequality:  U  GQ  T1  =  .05 

Resolution  Equation:  U  =  Q310/(Q299  +  Q300  +  Q301) 

Number  of  users  with  usage  rates:  GQ  T1  =  14 

Resolution:  Retain  as  nucleus 

Data: 

AFC  Reference: 

Application 

Compliance 

Usage 

ADPAC-1 

CFI 

.1555 

ADPAC-2 

CFI 

.1428 

ADPAC-3 

CFI 

0 

CSC 

CFI 

(N/A) 

FAA 

CFI 

.8 

FOCC-1 

CFI 

.0404 

FOCC-2 

CFI 

.3125 

HAM 

CFI 

.3571 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

.2307 

NAVC-3 

CFI 

0 

NCDCF 

CFI 

.9090 

NEL 

CFI 

.0214 

NMCSSC 

CFI 

.2857 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFNI 

0 

RADC-3 

CFI 

.1181 

RADC-4 

CFI 

.0787 

SAC-1 

CFI 

.2610 

SAC-2 

CFI 

.5251 

SAC-3 

CFI 

.7140 

SAC-4 

CFI 

1.011 

N(CFI)=  21  N(CFID)=  0  N(CFNI)  =  1 
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RESOLUTION  ANALYSIS 


JAQ  Reference:  J  3.5.4.10  AFC  Reference:  A  9.6/  A9.7 

Feature  Name:  PROGRAM 

Resolution  Inequality;  N/A 

Resolution  Equation:  N/A 

Number  of  users  with  usage  rates;  GQ  T1  =  N/A 

Resolution:  Retain  as  nucleus 

Note:  Extension  proposed  in  3.2.2.15. 

Data: 

Application  Compliance  Usage 


ADPAC-1  CPI 

ADPAC-2  CFI 

ADPAC-3  CFI 

CSC  CFI 

FAA  CFI 

FOCC-1  CFI 

FOCC-2  CFI 

HAM  CFID 

NAVC-1  CFI 

NAVC-2  CFI 

NAVC-3  CFI 

NCDCF  CFI 

NEL  CFID 

NMCSSC  CFID 

RADC-1  CFI 

RADC-2  CFID 

RADC-3  CFID 

RADC-4  CFID 

SAC-1  CFID 

SAC-2  CFID 

SAC-3  CFID 

SAC-4  CFID 

N(CFI)=  12  N(CFID)=  10  N(CFNI)=  0 
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RESOLUTION  ANALYSIS 

JAQ  Reference:  J  3.5.4.6  AFC  Refe-fsnce:  A  9.6.1 

Feature  Name:  PROCEDURE  (Excluding  Function) 

Resolution  Inequality:  U  GQ  T1  =  .05 

Resolution  Equation:  U  =  Q25l/(Q251  +  Q257  +  Q261) 

Number  of  users  with  usage  rates:  GQ  T1  =  17 

Resolution:  Retain  as  nucleus 

Data: 


Application 

Compliance 

Usage 

ADPAC-1 

CFI 

1 

ADPAC-2 

CFI 

.2916 

ADPAC-3 

CFI 

.2857 

CSC 

CFI 

(  N/A) 

FAA 

CFID 

.9 

FOCC-1 

CFI 

.8823 

FOCC-2 

CFI 

.8196 

HAM 

CFI 

1 

NAVC-1 

CFID 

(N/C) 

NAVC-2 

CFID 

(N/C) 

NAVC-3 

CFID 

(N/C) 

NCDCF 

CFI 

.7500 

NEL 

CFID 

.8571 

NMCSSC 

CFI 

.6250 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFI 

.9 

RADC-3 

CFI 

.1250 

RADC-4 

CFI 

1 

SAC-1 

CFID 

.5714 

SAC-2 

CFID 

.6060 

SAC-3 

CFID 

.8152 

SAC-4 

CFID 

.7128 

N(CFI)=  13  N(CFID)=  9 
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N(CFNI) 

1 
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RESOLUTION  ANALYSIS 


JAQ  Reference:  J  3. 5. 4. 6 


Feature  Name:  Close  In  Parameter  List 


Resolution  Inequality:  U  GO  Tl  =  .05 
Resolution  Equation:  U  =  Q252/Q251 

Number  of  users  with  usage  rates:  GO  Tl  =  1 
Resolution:  Retain  as  Optional 

Data: 


Appllcatl  on 

ADPAC-1 

ADPAC-2 

ADPAC-3 

CSC 

FAA 

FOCC-1 

FOCC-2 

HAM 

NAVC-] 

NAVC-2 

NAVC-3 

NCDCF 

NEL 

NMCSSC 

RADC-1 

RADC-2 

RADC-3 

RADC-4 

SAC-l 

SAC-2 

SAC-3 

SAC-4 

N(CFI)  = 


Compliance 

CFI 

CFI 

CFI 

CFI 

CFNI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFNI 

CFNI 

CFNI 

CFNI 

17  N(CFID)  = 


AFC  Reference: 


Usage 

0 

0 

0 

(N/A) 

0 

0 

0 

0 

(N/C) 

0 

(N/C) 

0 

.0833 

0 

(N/C) 

0 

0 

0 

0 

0 

0 

0 


A  9.6.1 
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N(CFNI)  =  5 


RESOLUTION'  ANALYSIS 


JAQ  Reference:  J  3. 5. 4. 6 

Feature  Name:  Statement  label  In  Parameter  List 

Resolution  Inequality:  U  GQ  T1  =  .05 

Resolution  Equation:  U  =  Q253/Q251 

Number  of  users  with  usage  rates:  GE  T1  =  T2  =  5 


Resolution:  Retain  as  optional 

Data: 

Application 

ADPAC-1 

ADPAC-2 

ADPAC-3 

CSC 

FAA 

FOCC-I 

FOCC-2 

HAM 

NAVC-1 

NAVC-2 

NAVC-3 

NCDCF 

NEL 

NMCSSC 

RADC-1 

RADC-2 

RADC-3 

RADC-4 

SAC-1 

SAC-2 

SAC-3 

SAC-4 

N(CFI)  = 


Compliance 

CFI 

CFI 

CFI 

CFI 

CFNI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFID 

CFI 

CFI 

CFr 

CFI 

CFI 

CFNI 

CFNI 

CFNI 

CFNI 

17  N(CFID)=  0 


AFC  Reference:  A  .9.6. 


Usage 

.0270 

.1428 

0 

(N/A) 

0 

0 

0 

0 

(N/C) 

0 

(N/C)' 

.0666 

.1666 

.4000 

(N/C) 

.2 

0 

0 

0 

0 

0 

0 

N(CFN1)=  5 
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RESOLUTION  ANALYSIS 


JAQ  Reference:  J  3. 5. 4. 8 

Feature  Name:  FUNCTION 

Resolution  Inequality:  U  GO  T1  =  .05 

Resolution  Equation:  U  =  0261/(0251  +  0247  +  0261) 

Number  of  users  with  usage  rates:  GO  T1  =  12 

Resolution:  Retain  as  nucleus 

Data: 

AFC  Reference:  A  9.6 

Application 

Compliance 

Usage 

ADPAC-1 

CFI 

0 

ADPAC-2 

CFI 

.0416 

ADPAC-3 

CFI 

.7142 

CSC 

CFI 

(N/A) 

FAA 

CFID 

.2 

FOCC-1 

FOCC-2 

CFI 

CFI.  1639 

.1176 

HAM 

CFI 

0 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

.3125 

NAVC-3 

CFI  ' 

0 

NCDCF 

CFI 

.2500 

NEL 

CFI 

0 

NMCSSC 

CFI 

.1875 

PA  DC-1 

CFI 

(N/C) 

RADC-2 

CFF 

.2 

RADC-3 

CFI 

.7500 

RADC-4 

CFI 

0 

SAC-1 

CFID 

.2571 

SAC-2 

CFID 

.2121 

SAC-3 

CFID 

.0119 

SAC -4 

CFID 

.2666 

N(CFI)=  17 

N(CFID)=  5 

N(CFNI)=  0 
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RESOLUTION  ANALYSIS 


JAQ  Reference:  j  3. 5. 4. 5 

AFC  Reference: 

Fea'-’jre  Name:  CLOSE 

Resolution  Inequality:  y  qq  ]■]  =  ^05 

Resolution  Equation:  y  =  Q247/(Q251  +  Q247  +  Q261) 

Number  of  users  with  usage  rates: 

GO  T1  =  11 

Resolution:  Retain  as  nucleus 

* 

Data: 

Apolication 

Compliance 

Usage 

ADFAC-l 

CFI 

0 

ADPAC-2 

CFI 

.6666 

ADPAC-3 

CFI 

0 

CSC 

CFI 

(N/A) 

FAA 

CFI 

.2 

FOCC-1 

CFI 

0 

FOCC-2 

CFI 

.1639 

HAM 

CFI 

0 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

.0625 

NAVC-3 

CFI 

0 

NCDCF 

CFI 

0 

NEL 

CFI 

.1428 

NMCSSC 

CFI 

.1875 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFr' 

.1 

PJ^DC-3 

CFI 

.1250 

RADC-4 

CFI 

0 

SAC-1 

CFI 

.1714 

SAC-2 

CFI 

.1818 

SAC-3 

CFI 

.1027 

SAC-^ 

CFI 

.0205 

N(CFI)  = 

22  N(CFID)=  0 

N(CFNI) 

*These  data  indicate  retention  as  optional, 
retention  as  nucleus  21 1 


A9.6. 


Interview  responses  to  question  1-27  require 


RESOLUTION  ANALYSIS 


JAQ  Reference: 

J  3. 5. 5. 6 

AFC  Reference: 

Feefure  Name: 

RETURN  STATEMENT 

Resolution  Inequal 

I'ty:  N/A 

Resolution  Equation:  Q134 

Number  of  users  with  usage  rates:  GQ  T1  = 

N/A 

Resolution: 

Accept  as  nucleus 

Data: 

Application 

Compliance 

Usage 

AD^AC-l 

CFI 

48 

ADPAC-2 

CFI 

60 

ADPAC-3 

CFI 

3 

CSC 

CFI 

(N/A) 

FAA 

CFI 

.8 

FOCC-1 

CFI 

300 

FOCC-2 

CFI 

25 

HAM 

CFI 

50 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

25 

NAVC-3 

CFI 

40 

NCDCF 

CFI 

30 

NEL 

CFID 

100 

NMCSSC 

CFI 

75 

PsADC-1 

CFI 

(N/C) 

RADC-2 

CFf 

.9 

Pj^DC-3 

CFI 

50 

RADC-4 

CFI 

20 

SAC-1 

CFI 

700 

SAC-2 

CFI 

1200 

SAC-3 

CFI 

686 

SAC-4 

CFI 

1520 

N(CFI)  =  21 

N(CFID)  = 

1  N(CFNI) 

A  9.6.3 
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RESOLUTION  ANALYSIS 


JAG  Reference:  j  3.5.4.11 

Feature  Ncrre:  PROGRAM  DECLARATION 

Resolution  Inequality:  N/A 

Resolution  Equation:  U  =  Q275 

Nurrber  of  users  with  usage  rates:  GO  T1  =  N/A 

Resolution:  Retain  as  optional 

Date: 

AFC  Reference: 

Application 

Compliance 

Usage 

ADPAC-l 

CFNI 

0 

ADPAC-2 

CFNI 

0 

ADPAC-3 

CFNI 

i  ^ 

0 

CSC 

CFNI 

0 

FAA 

CFI 

1  or  more 

FOCC-1 

CFI 

1 

FOCC-2 

CFI 

0 

HAM 

CFNI 

0 

NAVC-1 

CFI 

0 

NAVC-2 

CFI 

0 

NAVC-3 

CFI 

0 

NCDCF 

CFNI 

0 

NEL 

CFID 

1 

NMCSSC 

CFNI 

0 

RADC-1 

CFI 

0 

RADC-2 

cfHi 

0 

P^DC-3 

CFI 

0 

RADC-4 

CFI 

0 

SAC-1 

CFNI 

1260 

SAC-2 

CFNI 

16 

SAC-3 

CFNI 

no 

SAC-4 

CFI 

50 

N(CFI)=  10 

N(CFID)  = 

1  N(CFN!) 

A9.7 
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RESOLUTION  ANALYSIS 


JAQ  Reference:  J  3. 5. 4. 4 

Fcoture  Name:  DIRECT  CODE 

Resolution  Inequality:  (J  GO  T1  =  1 

Resolution  Equation:  U  =  Q242 

Number  of  users  with  usage  rates:  GO  T1  =  16 

Resolution:  Retain  as  nucelus 


Data: 

Appllcatl  on 

ADPAC-1 

ADPAC-2 

ADPAC-3 

CSC 

FAA 

FOCC-1 

FOCC-2 

HAM 

NAVC-1 

NAVC-2 

NAVC-3 

NCDCF 

NEL 

NMCSSC 

RADC-i 

RADC-2 

RADC-3 

RADC-4 

SAC-i 

SAC-2 

SAC-3 

SAC-4 

N(CFI)  = 


Compliance 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFlf) 

CFI 

CFI 

CFID 

CFID 

CFID 

CFID 

17  N(CFID)  = 


AFC  Reference:  A  9.8 


Usage 

5 

130* 

12 

(N/A) 

1  or  more 
60 
50 
15 

(N/C) 

10 

5 

15 

50 

50 

(N/C) 

1  or  more 
150 
0 

880 

2000 

620 

620 

5  N(CFNI)  =  0 


214 


RESOLUTION  ANALYSIS 


JAQ  Reference:  J  3. 5. 1.5 

AFC  Reference: 

Feature  Name:  STRUCTURE  FILE 

Resolution  Inequality:  N/A 

Resolution  Equation:  U  =  Q107 

Number  of  users  with  usage  rates: 

GO  T1  =  N/A 

Resolution:  Delete  in  favor  of  features  specificed 

in  3.2.2.11 

Data: 

Application 

Compliance 

Usage 

ADPAC-1 

CFI 

34 

ADPAC-2 

CFI 

0 

ADPAC-3 

CFI 

2 

CSC 

CFID 

(N/A) 

FAA 

CFNI 

0 

FOCC-1 

CFID 

80 

FOCC-2 

CFID  . 

20 

HAM 

CFNI 

0 

NAVC-1 

CFID 

(N/C) 

NAVC-2 

CFID 

6 

NAVC-3 

CFID  ‘ 

2 

NCDCF 

CFID 

38 

NEL 

CFID 

300 

NMCSSC 

CFI 

20 

RADC-1 

CFNI 

(N/C) 

RADC-2 

CFNI 

0 

RADC-3 

CFNI 

0 

RADC-4 

CFID 

0 

SAC-1 

CFNI 

0 

SAC-2 

CFNI 

0 

SAC-3 

CFNI 

0 

SAC-4 

CFNI 

0 

N(CFI)=  4  N(CFID)=  9  N(CFNI)  =  9 
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RESOLUTION  ANALYSIS 


JAQ  Reference: 

Feature  Name: 

Resolution  Inequality: 

Resolution  Equation: 

Number  of  users  with  usage  rates: 
Resolution: 

Data: 

Application 
ADPAC-1 
ADPAC-2 
ADPAC-3 
CSC 
FAA 
FOCC-1 
FOCC-2 
HAM 
NAVC-1 
NAVC-2 
NAVC-3 
NCDCF 
NEL 


NMCSSC  CFI 

RADC-1  CFNI 

RADC-2  CFNI 

RADC-3  CFNI 

RADC-4  CFNI 

SAC-1  CFNI 

SAC-2  CFNI 

SAC-3  CFNI 

SAC-4  CFNI 


N(CFI)  =  4 


0 

1 

(N/A) 

0 

.0500 

.  '  0 

0 

(N/C) 

0 

0 

.4736 

0 

.5000 

(N/C) 

0 

0 

0 

0 

0 

0 

0 

N(CFID)=  9  N(CFNI)=  9 


J  3.5.1 .5 

STRUCTURE  FILE  -  Hollerith  or  Binary 
N/A 

U  =  Q108/Q107 

GO  T1  =  N/A 
Delete  In  favor  of  features  specified  In  3.2.2.11 


AFC  Reference:  A  10 


Compliance 
CFI 
CFI 
CFI 
CFID 
CFNI 
CFID 
CFID 
CFNI 
CFID 
CFID 
CFID 
CFID 
CFID 


Usage 

1 
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RESOLUTION  ANALYSIS 


JAQ  Reference;  j  3. 5.1. 5 


AFC  Reference:  iq 


Feature  Narre:  STRUCTURE  FILE  -  Record  Length  Variability 

Resolution  Inequality:  N/A 

Resolution  Equation;  (j  =  Q109/Q107 

Number  of  users  with  usage  rates;  GQ  T1  =  N/A 

Resolution;  Delete  In  favor  of  features  specified  in  3.2.2. 1 1 

Data; 


Application 

Compliance 

Usage 

ADPAC-l 

CFI 

.3235 

ADPAC-2 

CFI 

0 

ADPAC-3 

CFI 

0 

CSC 

CFID 

(N/A) 

FAA 

CFNI 

0 

FOCC-1 

CFID 

.0500 

FOCC-2 

CFID 

0 

HAM 

CFNI 

0 

NAVC-1 

CFID 

(N/C) 

NAVC-2 

CFID 

0 

NAVC-3 

CFID  • 

0 

NCDCF 

CFID 

.5263 

NEL 

CFID 

0 

NMCSSC 

CFI 

.7500 

RADC-1 

CFNI 

(N/C) 

P^DC-2 

CFNI 

0 

RADC-3 

CFNI 

0 

RADC-4 

CFID 

0 

SAC-1 

CFNI 

0 

SAC-2 

CFNI 

0 

SAC-3 

CFNI 

0 

SAC-4 

CFNI 

0 

N(CFID)=  9  N(CFNI)=  9 


N(CFI)  =  4 
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RESOLUTION  ANALYSIS 


JAQ  Reference: 

J  3. 5. 2. 2. 2. 5 

AFC  Reference:  A 

Feature  Name: 

INPUT/OUTPUT 

—  POS 

Resolution  1  nequality:  N/A 

Resolution  Equation:  U  =  Q165 

Number  of  users  with  usage  rates: 

GQ  T1  =  N/A 

Reso’utlon:  Modify  as  specified 

in  3.2.2.11 

Data: 

Application 

Compliance 

Usage 

ADPAC-1 

CFID 

7 

ADPAC-2 

CFID 

0 

ADPAC-3 

CFID 

0 

CSC 

CFI 

(N/A) 

FAA 

CFNI 

1  or  more 

FOCC-1 

CFNI 

0 

FOCC-2 

CFNI  - 

0 

HAM 

CFNI 

0 

NAVC-1 

CFNI 

(N/C) 

NAVC-2 

CFNI 

0 

NAVC-3 

CFNI  ' 

0 

NCDCF 

CFID 

10 

NEL 

CFNI 

0 

NMCSSC 

CFI 

100 

RADC-1 

CFNI 

(N/C) 

RADC-2 

CFNI 

0 

RADC-3 

CFNI 

0 

RADC-4 

CFNI 

0 

SAC-I 

CFNI 

0 

SAC-2 

CFNI 

0 

SAC-3 

CFNI 

0 

SAC-4 

CFNI 

0 

N(CFID)=  4  N(CFNI)=  16 


N(CFI)  =  2 
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RESOLUTION  ANALYSIS 


JAQ  Reference:  J  3. 5. 3. 3  AFC  Reference;  A  10 

Feature  Name;  INPUT/OUTPUT  -  OPEN  Statement  with  Operand 

Resolution  Inequality:  N/A 

Resolution  Equation:  U  =  Q225 

Number  of  users  with  usage  rates:  GQ  T1  =  N/A 

Resolution:  Delete  in  favor  of  features  specified  in  3.2.2.11 

Data; 


Application 

ADPAC-1 

ADPAC-2 

ADPAC-3 

CSC 

FA  A 

FOCC-1 

FOCC-2 

HAM 

NAVC-1 

NAVC-2 

NAVC-3 

NCDCF 

NEL 

NMCSSC 

RADC-1 

RADC-2 

RADC-3 

RADC-4 

SAC-1 

SAC-2 

SAC-3 

SAC-4 

N(CFI) 


Compliance 
CFI 
CFI 
CFI 
CFI 
CFNI 
CFNI 
CFNI  , 

CFNI 

CFNI 

CFNI 

CFNI 

CFID 

CFNI 

CFID 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

CFNI 

4  N(CFID)  = 


Usage 

0 

0 

2 

(N/A) 

0 

0 

0 

0 

(N/C) 

0 

0 

0 

0 

0 

(N/C) 

0 

0 

0 

0 

0 

0 

0 

N(CFNI)=  16 
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RESOLUTION  ANALYSIS 


JAQ  Reference:  J3.5.3.3 

AFC  Reference: 

Feature  Narre:  INPUT/OUTPUT  -  OPEN  Statement  without  Operand 

Resolution  Inequality:  N/A 

Resolution  Equation:  y  =  Q226 

Number  of  users  with  usage  rates: 

GO  T1  =  N/A 

Resolution:  Delete  in  favor 

of  features  specified 

in  3.2.2.11 

Dote: 

Application 

Compliance 

Usage 

ADPAC-1 

CFI 

18 

ADPAC-2 

CFI 

0 

ADPAC-3 

CFI 

1 

CSC 

CFI 

(N/A) 

FAA 

CFNI 

0 

FOCC-1 

CFNI 

0 

FOCC-2 

CFNI  ^ 

0 

HAM 

CFNI 

0 

NAVC-1 

CFNI 

(N/C) 

NAVC-2 

CFNI 

0 

NAVC-3 

CFNI  ‘ 

0 

NCDCF 

CFID 

0 

Z 

rn 

CFNI 

0 

NMCSSC 

CFID 

20 

RADC-1 

CFNI 

(N/C) 

RADC-2 

CFNI 

0 

P^DC-3 

CFNI 

0 

RADC-4 

CFNI 

0 

SAC-l 

CFNI 

0 

SAC-2 

CFNI 

0 

SAC-3 

CFNI 

0 

SAC-/- 

CFNI 

0 

N(CFI)=  4  N(CFID)=  2  N(CFNI)  =  16 
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RESOLUTION  ANALYSIS 


JAQ  Reference:  J  3. 5. 3. 3 


AFC  Reference:  A  10 


Feature  Name:  INPUT/OUTPUT  -  SHUT  Statement  with  Operand 

Resolution  Inequality:  N/A 

I 

Resolution  Equation:  U  =  Q227 

Number  of  users  with  usage  rates:  GQ  T1  =  N/A 

Resolution:  Delete  in  favor  of  features  specified  in  3.2.2.11 

Data: 

ApoHcation  Compliance  '  Usage 


ADPAC-1 

CFI 

ADPAC-2 

CFI 

ADPAC-3 

CFI 

CSC 

CFI 

FAA 

CFNI 

FOCC-1 

CFNI 

FOCC-2 

CFNI 

HAM 

CFNI 

NAVC-1 

CFNI 

NAVC-2 

CFNI 

NAVC-3 

CFNI 

NCDCF 

CFID 

NEL 

CFNI 

NMCSSC 

CFID 

RADC-1 

CFNI 

RADC-2 

CFNI 

RADC-3 

CFNI 

RADC-4 

CFNI 

SAC-1 

CFNI 

SAC-2 

CFNI 

SAC-3 

CFNI 

SAC-4 

CFNI 

N(CFI)  =  4 


0 

0 

% 

7 

(N/A) 

0 

0 

.  '  0 

0 

(N/C) 

0 

0 

10 

0 

0 

(N/C) 

0 

0 

0 

0 

0 

0 

0 

N(CFID)=  2  N(CFNI)  = 


16 
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RESOLUTION  ANALYSIS 


JAG  Reference: 

J  3. 5. 3. 3 

AFC  Reference: 

Fee ‘u re  Name: 

INPUT/OUTPUT  -  SHUT  Statement  Without  Operand 

Resolution  Inequality: 

N/A 

Resolution  Equation: 

U  =  Q228 

Number  of  users  with 

usage  rates:  GQ  T1  =  N/A 

Resolution:  Delete  in  favor  of  Features  specified 

Date: 

in  3.2.2.11 

Application 

Compliance 

Usage 

ADPAC-l 

CFI 

18 

ADPAC-2 

CFI 

0 

ADPAC-3 

CFI 

2 

CSC 

CFI 

(N/A) 

FAA 

CFNI 

0 

FOCC-1 

CFNI 

0 

FOCC-2 

CFNI  ' 

0 

HAM 

CFNI 

0 

NAVC-1 

CFNI 

(N/C) 

NAVC-2 

CFNI 

0 

NAVC-3 

CFNI 

0 

NCDCF 

CFID 

0 

NEL 

CFNI 

0 

NMCSSC 

CFID 

20 

?ADC-] 

CFNI 

(N/C) 

RADC-2 

CFNI 

0 

^ADC-3 

CFNI 

0 

RADC-4 

CFNI 

0 

SAC-1 

CFNI 

0 

SAC-2 

CFNI 

0 

SAC-3 

CFNI 

0 

SAC-^ 

CFNI 

0 

N(CF!)=  4  N(CFID)=2  N(CFNI)  =  16 
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RESOLUTION  ANALYSIS 


JAQ  Reference:  j  3. 5. 3. 3 

AFC  Reference; 

Feature  Name:  INPUT/OUTPUT 

Resolution  Inequality:  N/A 
Resolution  Equation:  y  =  Q229 

-  INPUT  Statement 

Number  of  users  with  usage  rates: 

GO  T1  =  N/A 

Resolution:  Delete  in  favor  of  features  specified  in  3,2.2. 1 1 

Data; 

Application 

Compliance 

Usage 

ADPAC-1 

CFI 

18 

ADPAC-2 

CFI 

0 

ADPAC-3 

CFI  • 

0 

CSC 

CFI 

(N/A) 

FAA 

CFNI 

0 

FOCC-1 

CFNI 

0 

FOCC-2 

CFNI 

0 

HAM 

CFNI 

0 

NAVC-i 

CFNI 

(N/C) 

NAVC-2 

CFNI 

0 

NAVC-3 

CFNI 

0 

NCDCF 

CFID 

20 

NEL 

CFNI 

0 

NMCSSC 

CFID 

50 

RADC-1 

CFNI 

(N/C) 

RADC-2 

CFI^il 

0 

RADC-3 

CFNI 

0 

RADC-4 

CFNI 

0 

SAC-1 

CFNI 

0 

SAC-2 

CFNI 

0 

SAC-3 

CFNI 

0 

SAC-4 

CFI 

0 

N(CF1)=  4 

N(CF1D)=  2 

N(CFNl) 
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RESOLUTION  ANALYSIS 


JAQ  Reference:  J  3. 5. 3. 3  AFC  Reference:  a  10 

Feature  Name:  INPUT/OUTPUT  -  OUTPUT  Statement 

Resolution  Inequality:  N/A 
Resolution  Equation:  U  =  Q230 

Number  of  users  with  usage  rates:  GQ  T1  =  N/A 

Resolution:  Delete  in  favor  of  features  specified  in  3.2.2. 1 1 

Data: 

Application  Comoliance  Usage 


ADPAC-1 

CFI 

ADPAC-2 

CFI 

ADPAC-3 

CFI 

CSC 

CFI 

FAA 

CFNI 

FOCC-1 

CFNI 

FOCC-2 

CFNI 

HAM 

CFNI 

NAVC-1 

CFNI 

NAVC-2 

CFNI 

NAVC-3 

CFNI 

NCDCF 

CFID 

NEL 

CFNI 

NMCSSC 

CFID 

RADC-1 

CFNI 

RADC-2 

CFNli 

Pv^DC-3 

CFNI 

RADC-4 

CFNI 

SAC-1 

CFNI 

SAC-2 

CFNI 

SAC-3 

CFNI 

SAC-4 

CFNI 

18 

% 

0 

14 

(N/A) 

0 

0 

» 

'  0 

0 

(N/C) 

0 

0 

20 

0 

50 

(N/C) 

0 

0 

0 

0 

0 

0 

0 

N(CF!D)=  2  N(CFN!)=  16 


N(CF!)  =  4 
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RESOLUTION  ANALYSIS 


JAG  Reference:  J  3. 5. 1.1. 2. 2 

Feature  Name:  ITEM  Declaration  by  Preset  Constant 

Resolution  Inequality:  U  GQ  T1  =  .05 

Resolution  Equation:  U  =  Q8/Q14 

Number  of  users  with  usage  rates:  GQ  T1  =  N/A 

Resolution:  Retain  as  optional 

Data: 


Application 

ADPAC-1 

ADPAC-2 

ADPAC-3 

CSC 

FAA 

FOCC-1 

FOCC-2 

HAM 

NAVC-1 

NAVC-2 

NAVC-3 

NCDCF 

NEL 

NMiCSSC 

RADC-1 

RADC-2 

RADC-3 

RADC-4 

SAC-1 

SAC-2 

SAC-3 

SAC -4 

N(CF!)  = 


Compliance 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

cfnI 

CFI 

CFNI 

CFID 

CFID 

CFID 

CFI 

17  N(CF!D)  =  3 


AFC  Reference:  A  11 


Usage 

1 

0 

.0476 

(N/A) 

.8 

.0012 

0 

0 

(N/C) 

.1250 

0 

.0200 

.2000 

.1333 

(N/C) 

0 

0 

.2757 

.0362 

.1789 

.0428 

.0367 

N(CFNI)  =  2 
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RESOLUTION  ANALYSIS 


JAQ  Reference:  J  3, 5. 4. 3 

AFC  Reference:  A  11 .2 

Feature  Name:  Multiple  Statement  Labels 

Resolution  Inequality:  U  GQ  T1  =  .05 

Resolution  Equation:  U  =  Q238/Total  Number  of  Statements 
Number  of  users  with  usage  rates:  GQ  T1  =  N/A 

Resolution:  Retain  as  nucleus 

Data: 

Application  Compliance 

Note:  These  data  indicate 
that  the  multiple  statement 
labels  feature  ought  to  be 
deleted.  Because  of  the  high 
degree  of  interplay  between  the 
various  kinds  of  Statements  in 
JOVIAL  and  the  ease  of  syntactic 
specification  obtained  by 
allowing  this  feature  (CED  2448), 
we  are  recommending  that  this 
feature  be  retained  as  nucleus. 
Usage 

ADPAC-1 

CFI 

0 

ADPAC-2 

CFI 

0 

ADPAC-3 

CFI 

0 

CSC 

CFI 

(H/a) 

FA  A 

CFNI 

0 

FOCC-1 

CFI 

.0597 

FOCC-2 

CFI 

0 

HAM 

CFID 

0 

NAVC-1 

CFI 

(H/C) 

NAVC-2 

CFI 

0 

NAVC-3 

CFI 

0 

NCDCF 

CFI 

.0031 

NEL 

CFI 

0 

NMCSSC 

CFI 

0 

RADC-1 

CFI 

(H/C) 

RADC-2 

CFID 

0 

RADC-3 

CFID 

.0010 

RADC-4 

CFI 

0 

SAC-1 

CFID 

0 

SAC -2 

CFID 

.0001 

SAC-3 

CFID 

0 

SAC -4 

CFID 

0 

N(CFI)  =  14 

N(CFID)  =7 

N(CFNI)  =  1 
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RESOLUTION  ANALYSIS 


JAQ  Reference: 

Feature  Name: 

Resolution  Inequality: 

Resolution  Equation: 

Number  of  users  v/itb  usage  rates: 
Resolution:  Retain  as  optional 

Data: 

Application 

ADPAC-1 

ADPAC-2 

ADPAC-3 

CSC 

FAA 

FOCC-1 

FOCC-2 

HAM 

NAVC-1 

NAVC-2 

NAVC-3 

NCDCF 

NEL 


NMCSSC  CFI 

RADC-1  CFI 

RADC-2  CFNI 

RADC-3  CFI 

RADC-4  CFI 

SAC-1  CFNI 

SAC-2  CFNI 

SAC-3  CFNI 

SAC-^  CFID 


N(CFI)=  16 


.0035 

.0071 

(N/C) 

(N/A) 

0 

.0037 

0 

0 

(N/C) 

0 

.0148  ' 

.0031 

.0100 

.0010 

(N/C) 

0 

.0010 

0 

f 

0 

0 

0 

N(CFID)=  1  N(CFNI)=  5 


J  3.5.6.2  AFC  Reference:  A  12. 

DEFINE  Directive 
U  GQ  T1  =  .001 

U  =  Q236/Total  Number  of  Statements 
GQ  T1  =  8 

Compliance  Usage 

CFI 
CFI 
CFI 
CFI 
CFNI 
CFI 
CFI 
CFI 
CFI 
CFI 
CFI 
CFI 
CFI 
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RESOLUTION  ANALYSIS 

JAQRcferer.ee:  J  3. 5. 1.1. 3  A.=C  Reference:  A  12.2 

Feature  Ncrric:  MODE  DIRECTIVE  -  Automatic  and  Explicit 

Resolution  l.nequality:  U  GQ  T1  =  .02 

.Resolution  Equation:  U  =  Q12/Q14 

Number  of  users  with  usage  rates:  GQ  T1  =  5 

Resolution:  Retain  as  optional  (Note  extension  as  specified  in  3.2. 2. 8) 

Data; 


Application 

Corr.oliance 

U  sej'S 

ADPAC-1 

CFI 

0 

ADPAC-2 

CFI 

.0200 

ADPAC-3 

CFI 

0 

CSC 

CFI 

(N/A) 

.=AA 

CFNI 

0 

FOCC-1 

CFI 

0 

FOCC-2 

CFI 

0 

HAM 

CFNI 

0 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

0 

NAVC-3 

CFI 

1 

NCDCF 

CFNI 

0 

NEL 

CFI 

.4000 

NMCSSC 

CFI 

.0666 

.RADC-1 

CFI 

(N/C) 

RADC-2 

CFNI 

0 

RADC-3 

CFNI 

.0500 

.RADC-4 

CFNI 

0 

SAC-1 

CFID 

0 

SAC-2 

CFID 

0 

SAC-3 

CFID 

0 

SAC-4 

CFID 

0 

N(CFI)=  N(CF1D)='^ 
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RESOLUTION  ANALYSIS 


JAQ  Reference: 

J  3.5.1. 

1.3 

AFC  Reference; 

Feature  Name: 

MODE  DIRECTIVE  -  Explicit 

Resolution  Inequality: 

U  GQ  T1 

=  1 

Resolution  Equation: 

U  -  Q13 

Number  of  users  with  usage  rates: 

GQ  T1  =4 

Resolution: 

Retain  as 

optional  (Note  extension 

as  specified  in  3,. 

Data: 

Application 

Comioliance 

Usage 

ADPAC-1 

CFI 

0 

ADPAC-2 

CFI 

10 

ADPAC-3 

CFI 

0 

CSC 

CFI 

(N/A) 

FAA 

CFNI 

0 

FOCC-1 

CFI 

0 

FOCC-2 

CFI 

0 

HAM 

CFNI 

0 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

0 

NAVC-3 

CFI 

200 

NCDCF 

CFNI 

0 

NEL 

CFI 

40 

NMCSSC 

CFI 

5 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFNI 

0 

RADC-3 

CFNI 

1 

RADC-4 

CFNI 

0 

SAC-l* 

CFID 

0 

SAC-2 

CFID 

0 

SAC-3 

CFID 

0 

C  A 

CFID 

0 

N(CF1)=  N(CF1D)  =  '^  N(CFN1)=  ^ 
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RESOLUTION  ANALYSIS 


JAQ  Reference: 

J  3. 5.1. 3. 2 

AFC  Reference: 

Feature  Name: 

LIKE  TABLE  DECLARATION 

Resolution  Inequality: 

U  GQ  T1  =  .05 

Resolution  Equation: 

U  =  Q8VQ78 

Number  of  users  with 

usage  rates:  GQ  T1  =  9 

Resolution: 

Data: 

Retain  as  optional 

Application 

Compliance 

Usage 

ADPAC-l 

CFI 

.0789 

ADPAC-2 

CFI 

.0625 

ADPAC-3 

CFI 

0 

CSC 

CFI 

(N/A) 

FAA 

CFI 

.2 

FOCC-1 

CFI 

.0130 

FOCC-2 

CFI 

.1000 

HAM 

CFI 

0 

NAVC-1 

CFI 

(N/C) 

NAVC-2 

CFI 

.0666 

NAVC-3 

CFI 

0 

NCDCF 

CFNI 

0 

NEL 

CFI 

.2333 

NMCSSC 

CFI 

.1333 

RADC-1 

CFI 

(N/C) 

RADC-2 

CFI 

.2 

RADC-3 

CFI 

0 

RADC-4 

CFI 

0 

SAC-i 

CFI 

.M76 

SAC-2 

CFI 

.0346 

SAC-3 

CFI 

.0078 

SAC-4 

CFI 

.1088 

N(CFI)=  21  N(CF!D)=  0  N(CFNI)  =  1 
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RESOLUTION  ANALYSIS 


JAQ  Reference:  J  3.5. 5.5.5 

Feature  Name:  ALL 

Resolution  Inequality;  U  GQ  T  =  .05 

Resolution  Equation:  U  =  Q306/Q78 

Number  of  users  with  usage  rates:  GQ  T1  =  12 

Resolution:  Retain  as  nucleus 

Data: 


Application 


ComoIIcncc 


ADPAC-1 

ADPAC-2 

ADPAC-3 

CSC 

FAA 

FOCC-1 

FOCC-2 

HAM 

NAVC-1 

NAVC-2 

NAVC-3 

NCDCF 

NEL 

NMCSSC 

RADC-1 

RADC-2 

RADC-3 

RADC-4 

SAC-1 

SAC-2 

SAC-3 

SAC-4 

N(CFl)  = 


CFID 

CFID 

CFID 

CFI 

CFID 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFID 

CFI 

CFI 

CFI 

CFI 

CFI 

CFID 

CFID 

CFID 

CFID 

13  N(CFID)  = 


AFC  Reference:  A  12.5 


Uscge 

.3421 

.0625 

0 

(N/A) 

.8 

.M34 

0 

0 

(N/C) 

.06666 

0 

.1000 

.1000 

.2000 

(N/C) 

.2 

0 

0 

.1726 

.1230 

.4038 

.4455 

9  N(CFNI)  =  0 
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RESOLUTION  ANA.YSiS 


J  3.5.6. 1 
COMPOOL 
N/A 
N/A 

Number  of  users  with  usage  rates:  =  N/A 

Resolution:  Retain  as  nucleus 


JAQ  Reference: 
Feature  Name: 
Resolution  Inequality: 
Resolution  Ecuction: 


AFC  Reference:  A  12.6 


Data: 

Application 

ADPAC-1 

ADPAC-2 

AD?AC“3 

CSC 

FAA 

FOCC-1 

FOCC-2 

HAM 

NAVC-1 

NAVC-2 

NAVC-3 

NCDCF 

NEL 

NMCSSC 

RADC-1 

RADC-2 


RADC-3 


RADC-4 

SAC-i 

SAC-2 


Ar-'> 


SAC-4 


Compliance 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFI 

CFID 

CFI 

CFNI 

CFI 

CFNI 

CFI 

CFI 

CFI 

CFI 


Usagj 


N(CFl) 


Fl^=  19 


N(CF!D)=  1 


n(cfn:)  =  2 
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J  3.5.7 


OTHER  FEATURES 


Following  is  the  collection  of  response  to  the  other  feature  section  of  the  JAQ  that 
included  potential  JOVIAL  language  additions  not  specifically  mentioned  in  the 
previous  sections  of  the  JAQ; 


CSC 

(1) 

Hexadecimal  constant  feature  provided 
(as  well  as  octal) 

(2) 

Double  precision  floating  point  constants 
and  variables 

(3) 

An  ability  to  declare  a  PROC  as  a  closed 
routine  using  START  PROC  .  .  is  provided 

to  augment  the  standards 

FAA 

"EXIT 

"  -  Return  to  monitor  instruction 

FOCC-1 

(1) 

A  formatting  and  editing  capability  Is 
included  (FORMAT',  ENCODE',  DECODE') 

(2) 

"LOAD"'  is  used  to  bring  a  program  in 
loader  format  Into  core 

(3) 

"MESSAGE*"  enables  a  character  string  to 
be  output  to  the  system  console 

(4) 

"FAULT'  and  NOFAULT'"  are  used  to  enable 
and  disable  fault  interrupts 
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APPENDIX  III 


INTERVIEW  QUESTIONS 


This  Aopendix  contains  the  questions  asked  af  particioants  at  interview.  The 
symbols  "Y”,  "N",  "NSF\  "CT”  ,  denote  "Yes%  "Na%  "Na  Strang  Feeling", 
and  "Can‘t  Tell"  .  "No  Strang  Feeling"  was  used  by  respondents  when  they 
felt  that  the  proposed  addition,  extension,  or  modification  would  be  only 
marginally  heloful.  "Can't  Tell"  was  used  when  respondents  felt  they  required 
mare  specific  information  regarding  implementation  of  a  proposed  feature  in  order 
ta  decide  whether  or  not  it  would  be  worthwhile.  The  number  in  the  parenthesis 
is  the  related  "Aoproach  for  Change"  reference  number. 


The  interview  responses  to  these  questions  are  included  In  sequential  order  in 
Appendix  4,  along  with  their  recommended  disposition  or  resolution. 

1)  Expanded  Character  Sets  (A1  .1  .1) 

Equipments  which  permit  the  use  of  expanded  character  sets  are  currently 
available.  Using  these  equipments  it  is  possible  in  writing  JOVIAL  programs 
ta  use,  far  example,  the  symbol  "  <!  "  for  the  primitive  LS ,  or  "  (  "  for 
BEGIN. 

(1)  Da  you  use  expanded  character  sets  now  or  will  you  within  the 
next  two  years'^ 

Y  N  NSF  CT 

(2)  Are  you  in  favor  af  including  an  expanded  set  of  signs  in  JOVIAL? 

Y  N  NSF  CT 


2)  User  Definable  Character  Set/Encoding  Schemes  (A1  . 1  . 1) 

STC  data  are  composed  af  characters  which  are  a  subset  af  the  Hollerith 
characters  and  which  admit  ta  a  different  ("bit  pattern")  encoding  scheme. 
Are  you  in  favor  af  a  mechanism  in  the  language  which  would  allow  the 
user  ta  define  a  character  set  and  encoding  scheme? 

Y  N  NSF  CT 


3)  Hollerith  Comparisons  (A6.1) 

The  Standard  (AFM  100-24)  does  not  define  a  meaning  far  LS,  LQ,  GR,  and 
GO  when  these  relational  operators  occur  between  Hollerith  operands.  Are 
you  in  favor  of  establishing  such  a  meaning? 

Y  N  NSF  CT 
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FI  GURE  1 


"GROUP"  Data  Structure 
Declaration; 

GROUP  TARGET'COMPLEX  $ 

BEGIN 

GROUP  COMPLEX'ID  $ 

BEGI  N 

ITEM  SECTOR'NAME  H  24  $ 

ITEM  THREAT'  LEVE  L 
I  5  U  $ 

END  "COMPLEX'ID" 

I  TEM  COMMAND  '  GROU  P  H  8  $ 

TABLE  .  .  . 

END  "TARGET'COMPLEX" 

FIGURE  2 

"SET"  Data  Structure 
I  TEM  AA  I  23  S  $ 

ITEM  BB  I  23  U  $ 

GROUP  CC  $ 

BEGI  N 

ITEM  CC'l  •  •  •  $ 

ITEM  CC'2  •  •  •  $ 

END 

I  TEM  DD  F  $  •  •  • 

SET  ALPHA  $ 

BEGI  N  BB,  CC  ,  AA  END 
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4 )  Bit  Strings  (A  1.1) 

In  JOVIAL  there  are  four  formal  item  types:  Numeric,  character  (literal), 
status,  and  logical  (Boolean). 

(1)  In  your  aoplication,  do  you  sometimes  deal  with  data  which  are 
none  of  these  formal  types,  but  which  are  simply  strings  of  bits? 

Y  N  NSF  CT 

(2)  When  you  apply  functional  modifier  BIT  to  a  numeric  Item  are  you 
always  trying  to  access  a  substring  of  digits,  or  are  there  occasions 
where  you  are  more  interested  in  accessing  a  string  of  bits  with  no 
oarticular  numeric  aspect? 

Y  N  NSF  CT 

5)  GROUP  (A1 .2) 

In  JOVIAL,  aggregates  of  data  are  recurrences  of  simple  Items  as  in  arrays  or 
recurrences  of  sets  of  simole  Items  as  in  tables.  Sometimes  It  Is  convenient  to 
work  with  sets  of  items  which  do  not  recur  (e.g.  the  example  In  Figure  1).  The 
figure  shows  a  declaration  for  data  structure  called  GROUP,  A  grouo  may 
contain  simple  items,  arrays,  tables  or  other  group.  A  group  might  be  used 
as  an  I/O  record.  Also,  groups  may  be  assigned  to  groups  using  only  one 
assignment  statement  —  a  group  name  refers  collectively  to  all  the  data 
which  comprises  it.  Note  that  (serial)  tables  may  be  thought  of  as  one 
dimensional  array  of  groups,  where  a  group  is  the  table  entry. 

Are  you  in  favor  of  having  such  a  facility? 

Y  N  NSF  CT 

6)  SET  (A  1  .2) 

A  SET  (depicted  in  Figure  2)  Is  similar  to  a  grouo,  but  Is  primarily  a  naming 
facility  and  does  not  cause  allocation  to  take  place.  That  is,  a  set  dec¬ 
laration  provides  a  collective  name  for  groups,  tables,  arrays,  or  other  sets 
which  have  been  declared  elsewhere  In  the  program  and  which  do  not  nec¬ 
essarily  occupy  contiguous  blocks  of  words.  The  chief  use  of  set  would  be 
to  perform  assignments  in  the  manner  of  the  group  assignment.  Are  you  in 
favor  of  having  such  a  facility? 

Y  N  NSF  CT 

7)  Dynamic  Allocation  (A  1) 

Data  structures  In  JOVIAL  are  allocated  prior  to  execution  of  the  object 
program.  Are  you  in  favor  of  facilities  which  allow  the  programmer  to 
allocate  data  structures  at  program  execution  time. 

Y  N  NSF  CT 
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FIGURE  3 


SI  GNED  MAGNITUDE 
SI  GNED  MAG  -3: 

1  000  001 1 
ONES  COMPLEMENT  -3: 


1  111  1100 

FIGURE  4 

OVERLAY  --  USAGES 

(1)  Sequence: 

OVERLAY 

AA,  BB,  CC 

(2)  To  reclaim  Space 

OVERLAY 

AA  =  BB  $ 

(3)  To  provide  names  for  substructures: 

ARRAY  MATRIX  2  2  F  S 

ARRAY  COLUMN'  1  2  F  $ 

ARRAY  COLUMN'2  2  F  $ 

OVERLAY  MATRIX  =  COLUMN'l,  COLUMN'2 


(4)  To  assign  different  attributes  to  same  data 


ITEM 

XX  1 

48 

ITEM 

YY  F 

$ 

OVERLAY 

XX  = 

YY 
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8)  Storage  Allocation  Facilities  (A  3) 

JOVIAL  orovides  much  more  in  the  way  of  explicit  storage  allocation  facilities 
(e  .g  . ,  defined  packed  tables)  than  most  other  high  level  language.  In  your 
application,  are  these  facilities  regarded  as  important? 

Y  N  NSF  CT 

9)  Conversion  of  Programs  (A  3) 

With  respect  to  your  aoplicatlon,  have  you  already,  or  do  you  exoect  in  the 
future  to  transfer  orograms  written  for  one  comouter  to  another  dissimilar 
computer? 

Y  N  NSF  CT 

10)  Memory  Model  (A  3) 

In  the  standard  specifications  a  model  of  the  Standard's  computer  memory  Is 
described.  This  model  Is  made  up  of  words,  bits  within  words,  bytes  within 
words,  etc.  Is  this  model  accurate  with  respect  to  the  computer  (s)  used  in 
your  aoplication?  (This  model  as  opposed  to,  say,  a  purely  byte  oriented 
memory?) 

Y  N  NSF  CT 

11)  Signed  Magnitude  (A  3.2) 

The  Standard  requires  that  JOVIAL  compilers  oroduce  code  which  effects  a 
simulation  of  a  signed  magnitude  numeric  reoresentation  when  the  machine's 
numeric  representation  is  other  than  signed  magnitude.  (Shown  In  Figure  3). 

This  requirement  enables  compatibility  to  be  maintained  In  the  use  of  BIT 
and  OVERLAY,  but  may  cause  great  expense  In  terms  of  the  compiled  code 
generated.  Are  you  in  favor  of  dropoing  absolute  adherence  to  signed 
magnitude? 

Y  N  NSF  CT 

12)  Hexadecimal  Constants  (A  3.1) 

In  your  application,  would  hexadecimal  constants,  as  opposed  to  octal  constants, 
be  useful  ? 

Y  N 

13)  Packing  (A  3) 

Packing  in  JOVIAL  can  be  specified  only  with  respect  to  tables.  Packing,  however, 

is  only  oeripherally  associated  with  tables.  Are  you  in  favor  of  allowing  packing 
specifications  for  other  data  aggregates  as  well?  (e.g.,  Arrays,  groups) 

Y  N  NSF  CT 
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14)  OVERLAY  (A  3.6) 

There  are  two  distinct  usages  far  OVERLAY  (e.g.,  see  Figure  4).  Examples 
shawing  sequencing  and  space  reclaiming  usages  are  shawn  abave  the  dashed 
line  in  the  Figure;  examples  shawing  naming  and  multiple  interpretatlan  af 
the  same  bit  string  are  shawn  below  the  dashed  line.  In  your  application, 
is  OVERLAY  used  mare  in  the  area  characterized  by  examples  (1)  and  (2) 
ar  more  in  the  area  characterized  by  (3)  and  (4)? 

(l)/(2)  More  (3)/(4)  More  Bath  the  Same  CT 

15)  Absalute  Addresses  and  *LOC  (A  3.7,  A  3.8) 

(1)  Are  yau  in  favar  af  retaining  absolute  address  specificatians, 
as  in  OVERLAY  and  'PROGRAM  declaratians? 

Y  N  NSF  CT 

(2)  Are  yau  in  favar  af  retaining  the  'LOC  facility  far  manipulating 
absalute  addresses  at  execution  time? 

Y  N  NSF  CT 

16)  Double  Precisian  (  A  4. 1) 

(1)  Is  your  hardware  capable  af  double  precisian  arithmetic? 

Y  N 

(2)  Are  you  in  favar  af  incorporating  a  double  precisian  capability 
into  the  language? 

Y  N  NSF  CT 

17)  Prefix  Minus  (A  4.5) 

The  orecedence  of  orefix  minus  in  the  JOVIAL  Standard  is  different  from  the 
convention  taken  in  algebra.  (  See  Figure  5).  Are  you  in  favar  af  altering 
the  Standard  Specification  sa  that  it  will  comply  with  the  algebraic  con¬ 
vention? 


Y  N  NSF  CT 

18)  Functional  Modifier  ODD  (  A  7) 

When  applied  to  a  numeric  item,  ODD  produces  the  value  "true"  if  the  least 
significant  bit  of  the  item  is  1;  otherwise,  ODD  produces  "false"  . 

(1)  Do  you  have  functional  modifier  ODD  in  your  version  af  JOVIAL? 

Y  N 

(2)  Are  you  in  favar  af  retaining  ODD? 

Y  N  NSF  CT 
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19)  Structure  Operators  -  ARRAYS,  TABLES  (A  5) 

It  is  possible  to  define  generalized  arithmetic  ooerators  which  act  on  array  or 
table  elements  when  their  operands  are  nan-subscripted  array  or  table  names 
(e  .g  .  Example  in  Figure  6).  Are  yau  in  favar  of  generalizing  arithmetic 
aperatars  in  this  way? 

Y  N  NSF  CT 

20)  Structure  Operatar  -  MATRIX  (A  5) 

If  a  new  data  structure  called  MATRIX  is  introduced,  along  with  extended 
arithmetic  operatars  it  is  oossible  to  specify  matrix  arithmetic  computations 
without  the  use  of  FOR-laaps  (  See  Figure  7).  Note  that  a  MATRIX  is  a 
2  dimensianal  ARRAY  and  that  in  the  figure  implies  matrix  multiplication. 
Would  you  be  in  favar  af  incarporating  such  features? 

Y  N  NSF  CT 

21)  Structure  Operatar  -  COMPLEX  (A  8.2) 

A  data  structure  af  type  COMPLEX  would  be  composed  of  two  numeric  items  — 
a  "real"  item  and  an  "imaginary"  item.  It  is  oassible  ta  generalize  the  arithmetic 
aperators  in  such  a  way  that  whenever  they  apoear  with  operands  declared  as 
tyoe  COMPLEX,  they  cause  comolex  arithmetic  operatians  ta  take  place.  Are 
yau  in  favar  af  such  features  as  these? 

Y  N  NSF  CT 

22)  Raunding  (A  8.2) 

In  the  Standard,  numeric  items  may  be  declared  with  a  rounding  specifier, 
implying  that  any  value  being  assigned  to  such  items  must  be  rounded  prior 
to  assignment.  Sometimes  it  is  desirable  to  round  in  some  assignments  and 
not  in  others.  In  such  cases,  a  raunding  specification  is  more  properly 
an  attribute  af  assignment  statements.  Are  you  in  favor  of  switching  to 
the  rounding  specification  mechanism  as  shown  in  Figure  8? 

Y  N  NSF  CT 

23)  Parallel  "Monitoring"  (A  9) 

Sometimes  it  is  desirable  ta  monitor  the  status  af  the  hardware  in  oarallel  with 
other  oracessing  and  to  take  action  immediately  uoon  a  signal  that  the  hardware 
status  has  been  changed  (see  Figure  9).  "ON"  causes  a  monitoring  process 
which  tests  for  the  condition  "UNIT  READY"  ta  be  activated  during  the 
execution  of  the  code  between  BEGIN  and  END.  Monitoring  is  suspended  when 
control  passes  "through"  the  END.  If  the  condition  UNIT  READY  occurs  while 
the  monitoring  process  is  active,  the  statement  immediately  fallowing  the  ON 
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stal-emenf  is  executed.  In  the  figure,  this  statement  is  a  CLOSE  invocation; 
control  will  be  returned  to  the  program  step  which  was  being  processed  when 
the  condition  occurred,  once  the  CLOSE  terminate  execution.  Are  you  in 
favor  of  such  a  feature  as  the  ON  statement? 

Y  N  NSF  CT 

24)  STOP  (A  9.3) 

STOP  in  a  closed  subprogram  causes  control  to  pass  back  to  the  calling  program; 
when  executed  in  the  main  orogram,  it  causes  control  to  pass  to  the  monitor 
(if  there  is  one).  Are  you  in  favor  of  always  having  STOP  return  control  to  the 
monitor  as  opposed  to  retaining  the  two  different  actions  caused  by  STOP,  as 
described  above? 


Y  N  NSF  CT 

25)  Pausing  (A  9.3) 

Are  you  in  favor  of  having  a  pausing  facility? 

Y  N  NSF  CT 

26)  Label  Items  (A  9) 

It  is  possible  to  introduce  a  data  type,  called  a  label  item,  which  takes  statement 
labels  as  values.  (  See  Figure  10).  Label  items  permit  a  greater  flexibility  (and 
are  cleaner!)  in  switch  manipulation.  Are  you  in  favor  of  adopting  label  items? 

Y  N  NSF  CT 

27)  Closed  Subprograms  (A  9.6) 

In  the  Standard  JOVIAL  there  are  two  kinds  of  closed  subroutines  —  the  Close 
and  the  Procedure.  Closes  may  be  defined  within  FOR  loops  and  may  reference 
loop  variables;  closes  may  be  defined  within  closes.  With  the  exception  of 
the  above  two  features,  procedures  do  everything  a  close  does  and  also  allow 
the  user  to  have  input  and  output  parameters.  Are  you  in  favor  of  relying  solely 
on  procedures  and  deleting  closes? 

Y  N  NSF  CT 

28)  Alternate  Procedure  Entrances  (A  9.6.1) 

It  is  sometimes  convenient  to  have  more  than  one  point  of  entry  into  a  procedure 
(See  Figure  11).  The  figure  shows  alternate  entrance  declarations.  Note  that 
each  alternate  entrance  may  have  a  different  calling  sequence  if  desired.  An 
alternate  entrance  is  invoked  exactly  as  if  it  were  a  procedure  but  entrance  is 
made  at  the  associated  statement  label .  Are  you  in  favor  of  having  alternate 
entrances? 

Y  N  NSF  CT 
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FIGURE  5 


PREFIX  Ml  NUS 
In  JOVIAL: 

-  XX  **  2  =  9  if  XX  =  3 

In  ALGEBRA; 

-  X^  =  -9  if  X  -  3 

FIGURE  6 

"STRUCTURE"  OPERATOR  -  ARRAY 


ARRAY 

AA 

1  0 

F 

$ 

ARRAY 

BB 

1  0 

F 

$ 

ARRAY 

CC 

1  0 

F 

$ 

AA 

-  BB 

ie 

CC 

$ 

Means 

"FOR  I  =0,1,9,  $ 

AA  ($1  $)  =  BB  ($1  $)  *  CC  ($1  $)  $  " 

FIGURE  7 

"Sfrucfure"  Operator  --  MATRIX 
New  data  type  MATRIX 

MATRIX  AA  2  2  F  $ 

MATRIX  BB  2  2  F  $ 

MATRIX  CC  2  2  F  $ 

Then 

AA  =  BB  *  CC  $  means 
matrix  multiplication. 
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FIGURE  8 


Rounded  Assignment 

AA  =  BB  +  CC  *  (DD  -  EE) 


FIGURE  9 


Parallel  Monitoring 
ON  UNIT  REA  DY  $ 

GOTO  END'INPUT'RTN  $ 

BEGIN 

•  SCOPE  OVER  WHICH  UNIT 

•  STATUS  BEING  MONITORED 

, 

END  MONITORING  DEACTIVATED  HERE 


ROUNDED  $ 
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Label  It-ems 
DeclaraHon: 

ITEM 


FIGURE  10 


AA  LABE  L  $ 

USE: 

AA  =  ADD'EM'UP  $ 

"ADD'EM'UP  is  a  sfat'ement- 
label;  it-  is  now  fhe  value  of  AA' 
GOTO  AA  $  "NON  INDEXED  SWITCH" 
In  an  array: 

ARRAY  AA  3  LABE  L  $ 

GOTO  AA  ($  2  $)  "INDEXED  SWITCH" 

FIGURE  n 

Alt-ernat-e  Entrances 

PROC  AA  ( - ) 

ENTRANCE  BB  (  o  o  o  ) 

E  NTRA  NC  E  CC  (  o  o  o  ) 

BEGIN 

{  PROC  BODY 

CC. 

END 
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FIGURE  12 


SERIAL/PARALLEL  EXECUTION: 

SERIAL  PARALLEL 


1 


1 


This  statement  Initiates  a 
oarallel  execution  of  statement 
B.  Statement  C  terminates  the 
orocessing  stream  begun  at  B 
and  signals  "completion"  to  D. 


FIGURE  1  3 


"FORTRAN" 

1  00  FORMAT  (F  12.3,  14,  A6) 

READ  (1  00)  AA,  BB,  CC 


variables 

evaluated 


to  be 

by  reading. 
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FIGURE  14 


"COBOL" 


ITEM 

AA 

1 

48  S  $ 

ITEM 

BB 

PICTURE  (9  (7)  .  9  (3)  )  $ 

AA  = 

BB 

$ 

causes  conversion  from  character 

string 

to  binary 

BB  = 

AA 

$ 

causes  conversion  from  binary  to 

character 

string 


FIGURE  1  5 


Automatic  Blocking/Deblocking/Buffering 


Physical 


Record 


User  allocates  as  many 
buffers  as  he  wants  -  l/O 
system  automatically  fills 
(input)  or  empties  (output) 
buffers. 
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FIGURE  16 


NAME  SCOPES 


LOCAL  $ 

BEGIN 


END 


Names  declared  in  this 
precedence  over  names 
externally,  when  they 
in  the  block 


FIGURE  17 


EXTENDED  DEFI  NE 

DEFINE  SUM  (XX,  YY,  ZZ)  "XX 
SUM  (AA,  BB,  CC)  $ 
would  produce 

AA  =  BB  +  CC  $ 


block  take 
declared 
are  referenced 


=  YY  +  ZZ"  $ 
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FIGURE  18 


Extended  MODE 

MODE  I  I  48  S  $ 
MODE  Q  F  $ 


The  non-declared  identifier  INDEX  appearing 
after  these  extended  MODE  directives  would 
be  automatically  declared  os  I  48  S. 

The  non-declared  identifier  OUOVADIS  would 
be  automatically  declared  os  F. 


FIGURE  19 


"MACROS" 


% 

% 

ITEM 

NN 

NN 

=  9 

1 

$ 

5 

U  $ 

COMPILE 

TIME 

$ 

FOR 

1  = 

0, 

1  , 

NN 

STATEME  NTS 

AA 

($  1 

$)  = 

BB 

($ 

1  $)  * 

CC  ($  1  $) 

When  compile  time  program  is  executed,  the  program 
segment  below  is  produced  (AND  COMPILED) 


AA 

($ 

O 

$)  = 

BB 

($ 

0  5.)  *  CC  ($  O  $)  $ 

AA 

($ 

1 

$)  = 

BB 

($ 

1  $)  *  CC  ($  1  $)  $  •  •  • 

AA 

($ 

9 

$)  = 

BB 

($ 

9  $)  *  CC  ($  9  $)  $ 
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29)  Recursive  Subprograms  (A  9.6) 

Are  you  in  favor  of  oroviding  recursive  routines,  facilities,  i.e.,  routines  which 
may  call  themselves? 

Y  N  NSF  CT 

30)  Parallel  Processing  (A  9) 

JOVIAL  statements  are  executed  in  a  basically  serial  mode  —  one  statement 
is  executed  by  the  processor,  then  the  next,  etc.  When  computer  systems  with 
more  than  one  orocessor  are  used,  it  is  oossible  to  execute  several  different 
program  segments  in  oarallel  by  assigning  different  orogram  segments  to  different 
processors  (  See  Figure  12).  Are  you  in  favor  of  incorporating  formal  language 
elements  into  JOVIAL  which  would  allow  the  programmer  to  assign  program 
statements  to  different  orocessors? 

Y  N  NSF  CT 

31)  Stream  Oriented  l/O  (A  10) 

(1)  An  important  part  of  data  processing  involves  converting  data  in 
character  string  representations  to  and  from  data  in  internal  (binary) 
representations.  Do  you  currently  employ  formal  mechanisms  in  the 
language  to  perform  this  task? 

Y  N 

(2)  Stream  Oriented  l/O  Mechanisms 

Two  approaches  are  widely  used  to  perform  conversions.  The 
"FORTRAN  method"  causes  conversions  to  take  olace  under 
the  control  of  a  FORMAT  (see  Figure  13).  The  "COBOL 
approach"  allows,  in  essence,  for  item  declarations  to  be 
made  with  character  string  attributes;  conversion  is  then  per¬ 
formed  by  assignment  of  an  item  declared  with  an  internal 
representation  to  an  item  declared  with  a  character  string 
representation,  and  vice-versa  (see  Figure  14).  Are  you 
in  favor  of  incorporating  FORTRAN  type  mechanisms,  COBOL 
type  mechanisms,  or  neither'^ 

FORTRAN  COBOL  NEITHER 

32)  Functional  Files  (A  1  U) 

Functional  file  systems  allow  the  user  to  describe  functional  records  and  record 
manipulations  independently  of  any  actual  storage  medium  or  transmission  devices. 
Typically  these  systems  provide  for  the  automatic  blocking  and  deblocking  of 
"logical"  records  and  for  automatically  controlled  multiple  buffer  (see  Figure  15). 
With  respect  to  such  "classical"  functional  file  systems,  programmers  simply  specify 
functional  manipulations  of  logical  records;  all  details  are  taken  care  of  auto¬ 
matically.  Are  you  in  favor  of  adopting  a  functional  file  system  for  JOVIAL'^ 


Y 


N 


NSF 
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33)  Device  Oriented  l/O  (AlO) 

Device  oriented  |/0  refers  to  the  orocesses  by  which  transmission  devices  ore 
commanded  to  oerform  certain  tasks,  e.g.  REWIND,  INITIATE,  READ  „  The  l/O 
devices  will  operate  in  oarallel  with  the  central  oracessar,  and  the  Central 
Processor  will  be  Interrupted  by  the  devices.  Are  you  in  favor  af  incarparating 
mechanisms  In  JOVIAL  which  allow  the  orogrammer  ta  deal  with  these  orocesses? 

Y  N  NSF  CT 

34)  Prac-like  Name  Scapes  (A  11) 

(See  Figure  16).  This  figure  illustrates  a  oassible  name  scape  facility  which  U 
similar  ta  that  provided  by  PROCS.  The  primitive  LOCAL  declares  that  all  dec¬ 
larations  made  In  the  next  statement  are  local  ta  it.  Are  you  In  favor  af  such 
a  foci  llty  ? 

Y  N  NSF  CT 

35)  Extended  DEFINE  (A  12.1) 

(See  Figure  17).  It  is  passible  ta  extend  the  capabilities  af  the  DEFINE  directive 
ta  allow  far  the  automatic  Insertion  af  actual  calling  sequence  parameters  In  the 
DEFINE  string,  before  the  string  replaces  the  defined  Identifier  Itself.  Are  you 
in  favor  af  such  a  facility? 

Y  N  NSF  CT 

36)  Extended  MODE  (A  12.2) 

(See  Figure  18).  The  extended  MODE  facility  would  allow  the  programmer  ta 
mode  declare  items  an  the  basis  af  the  first  character  af  their  names.  Are  you 
In  favor  af  the  extended  MODE  facility? 

Y  N  NSF  CT 

37)  Macro  Facilities  (A  12) 

Macro  facilities  allow  the  programmer  ta  make  definitions  far  source  text  strings 
and  have  them  automatical  ly  inserted  Into  the  source  stream  when  they  are 
referenced  by  their  definition  name;  they  also  enable  the  orogrammer  ta  direct 
different  source  text  strings  ta  be  desired  an  the  basis  af  certain  conditions  which 
may  hold  true  at  compile  time.  (See  Figure  19).  In  the  system  shown,  there 
are  two  kinds  of  program  statements,  bath  af  which  have  the  same  farm  except 
far  a  beginning  sign,  %.  Statements  marked  with  %  are  compile  time  state¬ 
ments.  The  compiler  translates  compile  time  statements  and  then  executes 
them  —  at  compile  time.  The  example  shown  causes  the  nan-compile  time 
statement  ta  be  replicated  10  times  as  indicated  In  the  figure.  It  is  these 
replicated  statements  which  will  be  operated  at  execution  time.  Are  you  In 
favor  af  such  Macro  facilities? 

Y  N  NSF  CT 
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APPENDIX  IV 


INTERVIEW  RESPONSE  ANALYSIS 


This  appendix  contains  interview  question  response  summaries  and  analyses.  The  symbols 
"Y",  "N",  "NSF",  and  "CT"  ore  described  in  Appendix  3.  Resolutions  ore  based  upon 
criteria  fully  described  in  Sections  I  and  II  of  this  document.  The  meaning  of  resolutions 
of  the  form  "No  recommendation  at  this  time"  is  given  in  Section  II. 
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INTERVIEW  ANALYSIS 


1-1  AFC  Reference;  A  1  . 

(1)  Use  Expanded  Character  Sets  Now  or  in  Future? 

(2)  In  Favor  of  Adopting  Expanded  Set  in  Standard? 


Number  of  Users  with  Resoonse  Y: 

(1) 

2 

(2) 

2 

Number  of  Users  with  Response  N: 

(1) 

10 

(2) 

10 

Number  of  Users  with  Response  NSF: 

(1) 

0 

(2) 

0 

Number  of  Users  with  Response  CT: 

(1) 

0 

(2) 

0 

Data: 

Application 

Response 

ADPAC 

(1) 

N  (2) 

N 

FAA 

N 

Y 

FOCC 

N 

N 

HAM 

N 

N 

NAVC 

N 

N 

NCDCF 

N 

N 

NEL 

Y 

Y 

NHCP 

N 

N 

NMCSSC 

Y 

N 

RADC 

N 

N 

SAC 

N 

N 

TWA 

N 

N 

Resolution:  Do  not  adopt  a  standard  expanded  character  set. 


Interview  Question: 
Question  Content: 
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INTERVIEW  ANALYSIS 


Interview  Question:  1-2  AFC  Reference:  A1  . 1  . 1 

Question  Content:  In  Favor  of  User  Definable  Character  Set/Encoding  Scheme  Facility? 

Number  of  Users  with  Response  Y:  6 

Number  of  Users  wl th  Response  N:  6 

Number  of  Users  with  Response  NSF:  0 

Number  of  Users  with  Response  CT:  0 

Data: 


Application 

ADPAC 

FAA 

FOCC 

HAM 

NAVC 

NCDCF 

NEL 

NHCP 

NMCSSC 

RADC 

SAC 

TWA 


Response 

Y 

Y 

Y 
N 
N 

Y 

Y 
N 

Y 
N 
N 
N 


Resolution:  Adopt  'CHARCODE  directive  (3. 2. 2.3)  (optional) 
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INTERVIEW  ANALYSIS 


Interview  Question:  1-3 

Question  Content:  In  Favor  of  Hollerith  "  ^ 

Number  of  Users  with  Response  Y:  1  0 

Number  of  Users  with  Response  N:  1 

Number  of  Users  with  Response  NSF:  1 
Number  of  Users  with  Response  CT:  0 

Data: 

Application 

ADPAC 

FAA 

FOCC 

HAM 

NAVC 

NCDCF 

NEL 

NHCP 

NMCSSC 

RADC 

SAC 

TWA 

Resolution: 


AFC  Reference;  A  6.1 
,  "<'  "  Comparisons? 


Response 

NSF 

Y 

Y 
N 

Y 

Y 

Y 

Y 

Y 

Y 

Y 

Y 


Adopt  literol  comparison  feature  (3. 2. 2.4. 2)  (nucleus) 
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INTERVIEW  ANALYSIS 


Inferview  Quesfion:  1-4 


AFC  Reference;  A  1  .1 


Question  Content: 


(1)  Deal  With  Data  Which  are  Simply  BIT  Strings? 

(2)  When  BIT  is  Used,  Is  Referenced  Data  Just  BIT  String? 


Number  of  Users  with  Response  Y; 

(1) 

8 

(2) 

9 

Nurrber  of  Users  with  Response  N: 

(1) 

4 

(2) 

3 

Number  of  Users  with  Response  NSF: 

(1) 

0 

(2) 

0 

Number  of  Users  with  Response  CT: 

(1) 

0 

(2) 

0 

Data: 

Application 

Response 

ADPAC 

(1)  Y 

(2) 

Y 

FAA 

Y 

Y 

FOCC 

N 

N 

HAM 

N 

Y 

NAVC 

Y 

Y 

NCDCF 

N 

N 

NEL 

Y 

Y 

NHCP 

Y 

Y 

NMCSSC 

Y 

Y 

RADC 

N 

N 

SAC 

Y 

Y 

TWA 

Y 

Y 

Note;  The  purpose  of  Questions  1-4  (1),  (2)  was  to  ascertain  whether  or  not 

a  formal  item  type  "bit  string"  ought  to  be  incorporated  Into  JOVIAL. 
Operations  on  bit  strings  might  Include  assignment,  concateration, 
"and,"  "or,"  "not,"  etc. 

Resolution;  No  recommendation  at  this  time. 
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INTERVIEW  ANALYSIS 


Interview  Question:  1-5 

Question  Content:  In  Favor  of  GROUP  Data  Structure? 

Number  of  Users  with  Response  Y:  7 

Number  of  Users  with  Response  N:  4 

Number  of  Users  with  Response  NSF:  1 

Number  of  Users  with  Response  CT:  0 

Data: 


Application 

ADPAC 

FAA 

FOCC 

HAM 

NAVC 

NCDCF 

NEL 

NHCP 

NMCSSC 

RADC 

SAC 

TWA 


Response 

NSF 

Y 

Y 
N 
N 
N 

Y 

Y 

Y 

Y 
N 

Y 


AFC  Reference:  A  1  .2 


Resolution: 


No  recommendation  at  this  time. 
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INTERVIEW  ANALYSIS 


Interview  Question:  1-6 

Question  Content:  In  Favor  of  SET  Data  Structure? 

Number  of  Users  with  Response  Y:  8 

Number  of  Users  with  Response  N:  2 

Number  of  Users  with  Response  NSF:  2 

Number  of  Users  with  Response  CT:  0 

Data: 


Application 

ADPAC 

FAA 

FQCC 

HAM 

NAVC 

NCDCF 

NEL 

NHCP 

NMCSSC 

RADC 

SAC 

TWA 


Response 

NSF 

Y 

NSF 

N 

N 

Y 

Y 

Y 

Y 

Y 

Y 

Y 


AFC  Reference:  A  1  .2 


Resolution: 


No  recommendation  at  this  time. 
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INTERVIEW  ANALYSIS 


Interview  Question:  1-7  AFC  Reference:  A  1 

Question  Content:  In  Favor  of  Dynamic  Allocation  Facilities? 

Number  of  Users  with  Response  Y:  4 

Number  of  Users  with  Response  N:  6 

Number  of  Users  with  Response  NSF:  0 

Number  of  Users  with  Response  CT:  2 

Data: 


Application 

ADPAC 

FAA 

FQCC 

HAM 

NAVC 

NCDCF 

NEL 

NHCP 

NMCSSC 

RADC 

SAC 

TWA 


Response 

N 

CT 

N 

N 

N 

Y 
CT 
N 

Y 
N 

Y 

Y 


Resolution:  No  recommendation  at  this  time. 
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INTERVIEW  ANALYSIS 


Interview  Question:  1-8  AFC  Reference:  A  3 

Question  Content:  Explicit  Storage  Allocation  Facilities  Important? 

Number  of  Users  with  Response  Y:  1  2 

Number  of  Users  with  Response  N:  0 

Number  of  Users  with  Response  NSF:  0 

Number  of  Users  with  Response  CT:  0 

Data: 

Application 
ADPAC 
FAA 
FOCC 
HAM 
NAVC 
NCDCF 
NEL 
NHCP 
NMCSSC 
RADC 
SAC 
TWA 

Note:  This  question  was  not  intended  to  determine  the  need  for  any  specific  feature 

or  features,  but  rather  to  measure.  In  general  terms,  command  and  control 
programming  requirements.  Users  felt  strongly  that  these  explicit  storage 
allocation  facilities  are  among  the  most  powerful  of  the  JOVIAL  capabilities. 

Resolution:  N/A 


Response 

Y 

Y 

Y 

Y 

Y 

Y 

Y 

Y 

Y 

Y 

Y 

Y 
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INTERVIEW  ANALYSIS 


Interview  Question:  1-9  AFC  Reference:  A  3 

Question  Content:  Transfer  Already,  Or  In  Future,  Programs  Between  Different 

Computer  Systems? 


Number  of  Users  with  Response  to  Y:  1  0 

Number  of  Users  with  Response  to  N:  2 

Number  of  Users  with  Response  to  NSF:  0 

Number  of  Users  with  Response  to  CT:  0 


Data: 

Application 
ADPAC 
FA  A 
FOCC 
HAM 
NAVC 
NCDCF 
NEL 
NHCP 
NMCSSC 
RADC 
SAC 
TWA 

Note:  This  question,  like  1-9,  was  not  Intended  to  determine  the  need  for  any  specific 

feature  or  features,  but  rather  to  ascertain  user  requirements.  The  fact  that  the 
great  majority  of  users  responded  with  "yes"  implies  that  the  command  and 
control  language  should  be  very  machine  independent.  This  conflicts  with  the 
highly  machine  dependent  explicit  storage  allocation  facilities  deemed  so 
important  by  users.  It  is  impjortant  to  note  that  most  users  commented  that  they 
were  willing  to  sacrifice  machine  indepjendence  for  allocation  facilities. 

N/A 


Response 

Y 

Y 

Y 
N 

Y 

Y 

Y 
N 

Y 

Y 

Y 

Y 


Resolution: 
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INTERVIEW  ANALYSIS 


Interview  Question:  1-10  AFC  Reference:  A  3 

Question  Content:  Is  "Memory  Model"  Sufficient? 

Number  of  Users  with  Response  Y:  1  2 

Number  of  Users  with  Response  N:  0 

Number  of  Users  wi th  Response  NSF:  0 

Number  of  Users  with  Response  CT:  0 

Data: 


AppI  ication 

ADPAC 

FAA 

FOCC 

HAM 

NAVC 

NCDCF 

NEL 

NHCP 

NMCSSC 

RADC 

SAC 

TWA 


Response 

Y 

Y 

Y 

Y 

Y 

Y 

Y 

Y 

Y 
N 

Y 

Y 


Resolution: 


Retain  the  memory  model  —  words,  bits,  bytes 


as  is. 
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INTERVIEW  ANALYSIS 


Interview  Question:  1-1 1 


AFC  Reference:  A  3.2 


Question  Content*  Favor  of  Dropping  Absolute  Adherence  to  Signed  Magnitude 

Representation? 

Number  of  Users  with  Response  Y:  9 

Number  of  Users  with  Response  N:  1 

Number  of  Users  with  Response  NSF:  2 

Number  of  Users  with  Response  CT:  0 


Data: 


Application 

ADPAC 

FAA 

FOCC 

HAM 

NAVC 

NCDCF 

NEL 

NHCP 

NMCSSC 

RADC 

SAC 

TWA 


Response 

Y 

Y 

Y 
N 

Y 

Y 

Y 

Y 

Y 

Y 

NSF 

NSF 


Resolution:  Adopt  "relaxed"  signed  magnitude  interpretation  (3. 2. 2.5). 


264 


INTERVIEW  ANALYSIS 


Interview  Question:  1-12  AFC  Reference:  A  3.1 

Question  Content:  In  Favor  of  Hexadecimal  Constants? 

Number  of  Users  with  Response  Y:  5 

Number  of  Users  with  Response  N:  7 

Number  of  Users  wl  th  Response  NSF:  N/A 

Number  of  Users  with  Response  CT:  N/A 

Data: 

AppI  ication 
ADPAC 
FAA 
FOCC 
HAM 
NAVC 
NCDCF 
NEL 
NHCP 
NMCSSC 
RADC 
SAC 
TWA 

Note:  It  is  recommended  that  compilers  must  implement  either  the  octal  constant 

or  the  hexadecimal  constant,  but  that  they  may  implement  both. 

Resolution:  Adopt  a  hexadecimal  constant  capability  (3. 2. 2.1)  (optional) 


Response 

N 

Y 

Y 
N 
N 
N 

Y 

Y 

Y 
N 

Y 
N 
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INTERVIEW  ANALYSIS 


Inferview  Question:  1-13  AFC  Reference:  A  3 

Question  Content:  In  Favor  of  Generalized  Packing? 

Number  of  Users  with  Response  Y:  9 

Number  of  Users  with  Response  N:  3 

Number  of  Users  with  Response  NSF:  0 

Number  of  Users  with  Response  CT:  0 

Data: 


Application 

ADPAC 

FAA 

FOCC 

HAM 

NAVC 

NCDCF 

NEL 

NHCP 

NMCSSC 

RADC 

SAC 

TWA 


Response 

Y 

Y 

Y 
N 
N 
N 

Y 

Y 

Y 

Y 

Y 

Y 


Resolution:  No  recommendation  at  this  time. 
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INTERVIEW  ANALYSIS 


Interview  Question:  1-14 
Question  Content:  Use  of  OVERLAY 
Number  of  Users  with  Response  Y:  " 

Number  of  Users  with  Response  N:  " 

Number  of  Users  with  Response  NSF:  " 
Number  of  Users  with  Response  CT:  1 

Data: 

AppI  ication 

ADPAC 

FA  A 

FOCC 

HAM 

NAVC 

NCDCF 

NEL 

NHCP 

NMCSSC 

RADC 

SAC 

TWA 

Note: 

Resolution: 


AFC  Reference:  A  3.6 

(l)/(2)  more" 

(3)/(4)  more" 

Both  the  Same" 


Response 
(3)/(4)  more 
Both  the  same 
Both  the  same 
CT 

(1)/(2)  more 
(3)/(4)  more 
(3)/(4)  more 
Both  the  same 
Both  the  same 
(3)/(4)  more 
(1  )/(2)  more 
Both  the  same 


(See  next  page) 

No  recommendation  at  this  time. 
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Note: 


The  purpose  of  this  question  was  to  determine  whether  OVERLAY 
is  used  more  for  directing  allocation  —  its  immediately  apparent 
function  —  or  for  applying  multiple  interpretations  to  data  and 
data  structures,  DDI  contended  in  the  AFC  that  it  would  be 
preferable  to  provide  distinct  features  for  the  two  fundamental  functions 
performed  by  OVERLAY  because  this  would  provide  greater  ease  in 
training  novice  programmers  and  because  the  ambiguity  of  the  intent 
of  an  OVERLAY  (is  the  programmer  directing  allocation  or  is  he 
assigning  more  than  one  set  of  attributes  to  a  given  datum  or  data 
structure?)  would  be  avoided.  The  responses  indicate  that  nine 
of  the  12  applications  use  OVERLAY  at  least  as  much  for  per¬ 
forming  the  "multiple  interpretations"  function  as  for  the  allocation 
direction  function.  Based  upon  these  responses,  we  should  recommend 
distinct  features  to  replace  OVERLAY;  however,  owing  to  the  fact 
that  we  are  proposing  no  action  be  taken  as  yet  in  Implementing  new 
data  structures,  we  feel  that  it  would  be  counter-productive  to 
propose  features  to  replace  OVERLAY  at  this  time. 
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INTERVIEW  ANALYSIS 


Interview  Question:  1-15 


AFC  Reference:  A  3.7/A  3.8 


Question  Content: 


(1 )  In  Favor  of  Obtaining  Absolute  Address  Specifications? 


(2)  In  Favor  of  Retaining  'LOC? 
Number  of  Users  with  Response  Y:  (1)  8  (2)  9 

Number  of  Users  with  Response  N:  (1)  4  (2)  3 

Number  of  Users  with  Response  NSF:  (1)  0  (2)  0 

Number  of  Users  with  Response  CT:  (1)  0  (2)  0 

Data: 


Application 

ADPAC 

FAA 

FOCC 

HAM 

NAVC 

NCDCF 

NEL 

NHCP 

NMCSSC 

RADC 

SAC 

TWA 


Response 


(1)  Y  (2) 

Y 

Y 
N 

Y 
N 
N 

Y 
N 

Y 

Y 

Y 


Y 

Y 

Y 
N 
N 
N 

Y 

Y 

Y 

Y 

Y 

Y 


Resolution:  (1)  Retain  absolute  address  specification  facility  as  nucleus. 

(2)  Retain  'LOC  feature  as  nucleus. 
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INTERVIEW  ANALYSIS 


Interview  Question:  1-16 

AFC  Reference:  A  4 

^  ^  ,  (1)  Does  Hardware  Have  Double  Precision? 

Question  Content:  /o\  ,  r  r  pn  li  n  •  •  o 

(Z)  In  Favor  of  Double  Precision? 

Number  of  U 

sers  with  Response 

Y: 

(1)  8 

(2)  8 

Number  of  U 

sers  with  Response 

N; 

(1)  4 

(2)  4 

Number  of  U 

sers  with  Response 

NSF: 

(1)  N/A 

(2)  0 

Number  of  U 

sers  with  Response 

CT: 

(1)  N/A 

(2)  0 

Data: 

Application 

ADPAC 

Response 

(0  Y  (2) 

Y 

FAA 

Y 

Y 

FOCC 

N 

N 

HAM 

N 

N 

NAVC 

Y 

N 

NCDCF 

Y 

Y 

NEL 

Y 

Y 

NHCP 

Y 

Y 

NMCSSC 

Y 

Y 

RADC 

Y 

Y 

SAC 

N 

Y 

TWA 

N 

N 

Resolution: 

Adopt  extended  precision  feature  (3.2,2.10)  (optional) 

Note: 

The  extended  precision 

facility  Is  made  optional 

since  It  Is  a 

function  of  hardware. 
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INTERVIEW  ANALYSIS 


Interview  Question:  1-17  AFC  Reference:  A  4.5 

Question  Content:  In  Favor  of  Algebra-Like  Unary  Operator  Precedence? 

Number  of  Users  with  Response  Y:  6 

Number  of  Users  with  Response  N:  4 

Number  of  Users  with  Response  NSF:  2 

Number  of  Users  with  Response  CT:  0 

Data: 


Application 

ADPAC 

FAA 

FOCC 

HAM 

NAVC 

NCDCF 

NEL 

NHCP 

NMCSSC 

RADC 

SAC 

TWA 


Response 

N 

Y 
N 
N 

Y 

Y 

NSF 

Y 

NSF 

N 

Y 

Y 


Resolution: 


Adopt  Modification  of  Unary  Operator  Precedence  (3. 2.2.6)  (nucleus) 
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INTERVIEW  ANALYSIS 


Interview  Question:  1-18 

^  ^  (1)  Is  ODD  implemented? 

Quest, oo  Content,  Should  ODD  be  retained? 

Number  of  Users  with  Response  Y:  (1)  7  (2)  5 

Number  of  Users  with  Response  N:  (1)  5  (2)  6 

Number  of  Users  with  Response  NSF:  (1)  N/A  (2)  1 

Number  of  Users  with  Response  CT:  (1)  N/A  (2)  0 

Data: 


AFC  Reference:  A  7 


Application 

ADPAC 

FAA 

FOCC 

HAM 

NAVC 

NCDCF 

NEL 

NHCP 

NMCSSC 

RADC 

SAC 

TWA 


Response 


(1)  Y  (2) 
N 

Y 
N 

Y 
N 

Y 

Y 
N 

Y 
N 

Y 


Y 

Y 

Y 
N 
N 
N 

NSF 

Y 
N 

Y 
N 
N 


Resolution:  Retain  ODD  as  optional . 
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INTERVIEW  ANALYSIS 


Interview  Question:  1-19  AFC  Reference:  A  5 

Question  Content:  In  Favor  of  Structure  Operators  for  Arrays  and  Tables? 

Number  of  Users  with  Response  Y:  2 

Number  of  Users  with  Response  N:  8 

Number  of  Users  with  Response  NSF:  2 

Number  of  Users  with  Response  CT:  0 

Data: 


Application 

ADPAC 

FAA 

FOCC 

HAM 

NAVC 

NCDCF 

NEL 

NHCP 

NMCSSC 

RADC 

SAC 

TWA 


Response 

Y 

Y 
N 
N 
N 

NSF 

NSF 

N 

N 

N 

N 

N 


Resolution:  Do  not  adopt  structure  operators. 
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INTERVIEW  ANALYSIS 


Interview  Question:  1-20  AFC  Reference:  A  5 

Question  Content:  In  favor  of  MATRIX  and  MATRIX  operators? 

Number  of  Users  with  Response  Y:  3 

Number  of  Users  with  Response  N:  8 

Number  of  Users  with  Response  NSF:  1 

Number  of  Users  with  Response  CT:  0 

Data: 


Application 


Response 


ADPAC  N 

FAA  Y 

FOCC  N 

HAM  N 

NAVC  N 

NCDCF  NSF 

NEL  N 

NHCP  Y 

NMCSSC  Y 

RADC  N 

SAC  N 

TWA  N 


Resolution:  Do  not  adopt  matrix  and  matrix  operators. 
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INTERVIEW  ANALYSIS 


Interview  Question:  1-21  AFC  Reference:  A  5 

Question  Content:  In  favor  of  COMPLEX  and  operators? 

Number  of  Users  with  Response  Y:  3 

Number  of  Users  with  Response  N:  9 

Number  of  Users  with  Response  NSF:  0 

Number  of  Users  with  Response  CT:  0 

Data: 


AppI  ication 


Response 


ADPAC  N 

FAA  Y 

FOCC  N 

HAM  N 

NAVC  N 

NCDCF  Y 

NEL  Y 

NHCP  N 

NMCSSC  N 

RADC  N 

SAC  N 

TWA  N 


Resolution:  Do  not  adopt  a  data  structure  type  COMPLEX  and  complex  arithmetic. 
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INTERVIEW  ANALYSIS 


Interview  Question:  1-22 
Question  Content:  In  Favor  of  ROUND  in 

Number  of  Users  with  Response  Y:  5 

Number  of  Users  with  Response  N:  6 

Number  of  Users  with  Response  NSF:  1 
Number  of  Users  with  Response  CT:  0 

Data: 

AppI  Ication 
ADPAC 
FAA 
FOCC 
HAM 
NAVC 
NCDCF 
NEL 
NHCP 
NMCSSC 
RADC 
SAC 
TWA 


AFC  Reference:  A  8.2 
ignment  Statement? 


Response 

N 

Y 
N 
N 
N 

Y 

NSF 

Y 

Y 
N 

Y 
N 


Resolution:  Adopt  Round  Assignment  Statement  (3.2.2.14)  (optional) 
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INTERVIEW  ANALYSIS 


Interview  Question;  1-23 

Question  Content;  In  Favor  of  Parallel  Monitoring? 

Number  of  Users  with  Response  Y;  6 

Number  of  Users  with  Response  N;  5 

Number  of  Users  with  Response  NSF;  0 

Number  of  Users  with  Response  CT;  1 

Data; 


AppI  ication 

ADPAC 

FAA 

FQCC 

HAM 

NAVC 

NCDCF 

NEL 

NHCP 

NMCSSC 

RADC 

SAC 

TWA 


Response 

Y 

Y 
N 
N 

Y 
N 

Y 
CT 

Y 
N 

Y 
N 


Resolution;  Implementors  may  effect  such  a  feature  as  this  by 
EXECUTE  Statement  (3.2.2.11  .1).  Therefore  no 
monitoring  feature  is  proposed. 


AFC  Reference;  A  9 


use  of  the  proposed 
explicit  parallel 
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INTERVIEW  ANALYSIS 


Interview  Question:  1-23  AFC  Reference:  A  9 

Question  Content:  In  Favor  of  Parallel  Monitoring? 

Number  of  Users  with  Response  Y:  6 

Number  of  Users  with  Response  N:  5 

Number  of  Users  with  Response  NSF:  0 

Number  of  Users  with  Response  CT:  1 

Data: 


Application 

ADPAC 

FAA 

FOCC 

HAM 

NAVC 

NCDCF 

NEL 

NHCP 

NMCSSC 

RADC 

SAC 

TWA 


Response 

Y 

Y 
N 
N 

Y 
N 

Y 
CT 

Y 
N 

Y 
N 


Resolution:  Implementors  may  effect  such  a  feature  as  this  by  use  of  the  proposed 

EXECUTE  Statement  (3. 2. 2.1  1.1).  Therefore  no  explicit  parallel 
monitoring  feature  is  proposed. 
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INTERVIEW  ANALYSIS 


Interview  Question;  1-24  AFC  Reference:  A  9.3 

Question  Content:  In  Favor  of  Altering  STOP? 

Number  of  Users  with  Response  Y:  9 

Number  of  Users  with  Response  N;  3 

Number  of  Users  with  Response  NSF:  0 

Number  of  Users  with  Response  CT:  0 

Data: 

AppI  ication 
ADPAC 
FAA 
FOCC 
HAM 
NAVC 
NCDCF 
NEL 

NHCPQ 
NMCSSC 
RADC 
SAC 
TWA 

The  STO P  statement,  as  modified,  causes  termination  of  the  operating 
program  no  matter  where  it  occurs.  Thus,  a  STOP  never  returns  control  to 
the  calling  program  when  executed  in  a  closed  subprogram. 

Adopt  the  modification  to  STOP  (3.2.2.12)  (nucleus) 


Note; 


Resolution: 


Response 

Y 
N 
N 

Y 

Y 

Y 

Y 

Y 

Y 
N 

Y 

Y 
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INTERVIEW  ANALYSIS 


Interview  Question:  1-25  AFC  Reference:  A  9.3 

Question  Content:  In  Favor  of  a  Pausing  Feature? 

Number  of  Users  with  Response  Y:  5 

Number  of  Users  with  Response  N:  6 
Number  of  Users  with  Response  NSF:  1 
Nymber  of  Users  with  Response  CT:  0 

Data: 

Application 
ADPAC 
FA  A 
FOCC 
HAM 
NAVC 
NCDCF 
NEL 
NHCP 
NMCSSC 
RADC 
SAC 
TWA 


Response 

N 

N 

N 

N 

N 

Y 

Y 

Y 
N 

NSF 

Y 

Y 


Resolution:  Adopt  the  Pause  Statement  (3.2.2.13)  (optional) 
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INTERVIEW  ANALYSIS 


Interview  Question:  1-26 
Question  Content:  In  Favor  of  Label  Item? 

Number  of  Users  with  Respxjnse  Y:  5 

Number  of  Users  with  Response  N:  5 

Number  of  Users  with  Response  NSF:  2 
Number  of  Users  with  Respxjnse  CT:  0 

Data: 

AppI  ication 

ADPAC 

FAA 

FOCC 

HAM 

NAVC 

NCDCF 

NEL 

NHCP 

NMCSSC 

RADC 

SAC 

TWA 


AFC  Reference:  A  9 


Response 

Y 
N 

NSF 

N 

N 

N 

N 

Y 

Y 

Y 

NSF 

Y 


Resolution:  No  recommendation  at  this  time. 
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INTERVIEW  ANALYSIS 


Interview  Question:  1-27  AFC  Reference:  A  9.6 

Question  Content:  In  Favor  of  Deleting  Closes? 

Number  of  Users  with  Response  Y:  2 

Number  of  Users  with  Response  N:  9 

Number  of  Users  with  Response  NSF:  1 

Number  of  Users  with  Response  CT:  0 

Data: 

Application 

ADPAC 
FAA 
FOCC 
HAM 
NAVC 
NCDCF 
NEL 
NHCP 
NMCSSC 
RADC 
SAC 
TWA 

Note:  Users  feel  that  the  ability  to  define  Closes  within  FOR  loops  and 

the  ability  to  define  Closes  within  Closes  are  important. 

Resolution;  Retain  both  Procedures  and  Closes. 


Resf?onse 

N 

N 

N 

Y 
N 
N 

NSF 

N 

Y 
N 
N 
N 
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INTERVIEW  ANALYSIS 


Interview  Question:  1-28  AFC  Reference:  A  9.6.1 

Question  Content:  In  Favor  of  Alternate  Procedures  Entrances? 

Number  of  Users  with  Response  Y:  8 

Number  of  Users  with  Response  N:  3 

Number  of  Users  with  Response  NSF:  1 

Number  of  Users  with  Response  CT:  0 

Data: 


Application 

ADPAC 

FA  A 

FOCC 

HAM 

NAVC 

NCDCF 

NEL 

NHCP 

NMCSSC 

RADC 

SAC 

TWA 


Response 

Y 

Y 
N 
N 

Y 

Y 

Y 

Y 

Y 
N 

NSF 

Y 


Resolution:  Adopt  Alternate  Procedure  Entrances  (3.2. 2. 9)  (nucleus) 
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INTERVIEW  ANALYSIS 


Interview  Question:  1-29 

Question  Content:  In  Favor  of  Recursive  Subprograms? 

Number  of  Users  with  Response  Y:  5 

Number  of  Users  with  Response  N:  7 

Number  of  Users  with  Response  NSF:  0 

Number  of  Users  with  Response  CT:  0 

Data: 


Application 

ADPAC 

FAA 

FOCC 

HAM 

NAVC 

NCDCF 

NEL 

NHCP 

NMCSSC 

RADC 

SAC 

TWA 


Response 

N 

N 

N 

Y 
N 
N 

Y 
N 

Y 

Y 
N 

Y 


AFC  Reference:  A  9.6 


Resolution:  No  recommendation  at  this  time. 
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INTERVIEW  ANALYSIS 


I  nterview  Question:  1-30 

Question  Content:  In  Favor  of  Parallel  Processing  Features? 

Number  of  Users  v/ith  Response  Y:  3 

Number  of  Users  v/ith  Response  N:  7 

Number  of  Users  with  Response  NSF:  1 

Number  of  Users  with  Response  CT:  1 

Data: 


AppI  ication 

ADPAC 

FAA 

FQCC 

HAM 

NAVC 

NCDCF 

NEL 

NHCP 

NMCSSC 

RADC 

SAC 

TV/A 


Response 

N 

NSF 

Y 

Y 
N 
N 
N 
CT 
N 
N 
N 

Y 


AFC  Reference:  A  9 


Resolution: 


Do  not  adopt  parallel  processing  features. 
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INTERVIEW  ANALYSIS 


Inferview  Quesfion:  1-31 


AFC  Reference:  A  10 


QuesHon  Confenf: 


(1)  Data  edifing  and  conversion  feafures  now? 


(2)  Prefer  FORTRAN,  COBOL,  or  NEITHER? 
Number  of  Users  wifh  Response  Y:  (1)  2  (2)  FORTRAN  -  9 

Number  of  Users  wifh  Response  N:  (1)  10  (2)  COBOL  -  2 

Number  of  Users  wifh  Response  NSF:  (1)  N/A  (2)  NEITHER  -  1 

Number  of  Users  wifh  Response  CT:  (1 )  N/A 


Data: 


Applicafion  Response 


ADPAC 

(1)  N 

(2)  FTN 

FAA 

N 

FTN 

FOCC 

Y 

FTN 

HAM 

N 

NEITHER 

NAVC 

N 

FTN 

NCDCF 

N 

FTN 

NEL 

N 

CBL 

NHCP 

N 

FTN 

NMCSSC 

N 

FTN 

RADC 

N 

FTN 

SAC 

Y 

FTN 

TWA 

N 

CBL 

Resolufion: 


Adopf  Edifing  and  Conversion  Module  (3, 2,2,1  1  ,3)  (nucleus) 
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INTERVIEW  ANALYSIS 


Interview  Question:  1-32  AFC  Reference:  A  10 

Question  Content:  In  Favor  of  Functional  Files? 

Number  of  Users  with  Response  Y:  7 

Number  of  Users  with  Response  N:  5 
Number  of  Users  with  Response  NSF:  0 
Number  of  Users  with  Response  CT:  0 

Data: 

AppI  ication 
ADPAC 
FAA 
FOCC 
HAM 
NAVC 
NCDCF 
NEL 
NHCP 
NMCSSC 
RADC 
SAC 
TWA 


Response 

Y 

Y 

Y 
N 

Y 

Y 

Y 

Y 
N 
N 
N 
N 


Resolution: 


Adopt  Functional  File  Module  (3.2.2.11.2)  (optional) 
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INTERVIEW  ANALYSIS 


Interview  Question:  1-33  AFC  Reference:  A  10 

Question  Content:  In  Favor  of  Device  Oriented  I/O? 

Number  of  Users  with  Response  Y:  8 

Number  of  Users  with  Response  N:  4 

Number  of  Users  with  Response  NSF:  0 

Number  of  Users  with  Response  CT:  0 

Data: 


AppI  ication 

ADPAC 

FAA 

FOCC 

HAM 

NAVC 

NCDCF 

NEL 

NHCP 

NMCSSC 

RADC 

SAC 

TWA 


Response 

Y 
N 

Y 
N 
N 

Y 

Y 

Y 

Y 

Y 

Y 
N 


Resolution:  Adopt  Device  Module  (3.2.2.11  .1)  (optional) 
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INTERVIEW  ANALYSIS 


Interview  Question:  1-34 

Question  Content:  In  Favor  of  Proc-Like  Nome  Scopes 

Number  of  Users  with  Response  Y:  1 

Number  of  Users  with  Response  N:  9 

Number  of  Users  with  Response  NSF:  2 

Number  of  Users  with  Response  CT:  0 

Data: 


AFC  Reference:  A  11 


AppI  icotion 

ADPAC 

FAA 

FQCC 

HAM 

NAVC 

NCDCF 

NEL 

NHCP 

NMCSSC 

RADC 

SAC 

TWA 


Response 

N 

Y 

N 

N 

N 

N 

NSF 

N 

N 

NSF 

N 

N 


Resolution:  Do  not  adopt  Proc-Like  Nome  Scopes. 
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INTERVIEW  ANALYSIS 


Interview  Question:  1-35 

Question  Content:  In  Favor  of  Extended  Define? 

Number  of  Users  with  Response  Y:  7 

Number  of  Users  with  Response  N:  3 

Number  of  Users  with  Response  NSF:  2 

Number  of  Users  with  Response  CT:  0 

Data: 


Application 


ADPAC 

FA  A 

FOCC 

HAM 

NAVC 

NCDCF 

NEL 

NHCP 

NMCSSC 

RADC 

SAC 

TWA 


Response 

Y 

Y 

NSF 

N 

Y 
N 

Y 

Y 

Y 

NSF 

N 

Y 


AFC  Reference:  A  12.1 


Resolution:  Adopt  Extended  Define  Facility  (3. 2,2,7)  (optional) 
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INTERVIEW  ANALYSIS 


Interview  Question:  1-36 

Question  Content:  In  Favor  of  Extended  Mode? 

Number  of  Users  with  Response  Y:  7 

Number  of  Users  with  Response  N:  4 

Number  of  Users  with  Response  NSF:  1 
Number  of  Users  with  Response  CT:  0 

Data: 

Application 
ADPAC 
FAA 
FOCC 
HAM 
NAVC 
NCDCF 
NEL 
NHCP 
NMCSSC 
RADC 
SAC 
TWA 

Resolution:  Adopt  Extended  Mode  Facility  (3. 


AFC  Reference:  A  12.2 


Response 

Y 

Y 

Y 
N 

Y 

NSF 

Y 
N 

Y 
N 

Y 
N 

.2.8)  (optional) 
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INTERVIEW  ANALYSIS 


Interview  Question:  1-37 

Question  Content:  In  Favor  of  Macro  Facilities? 
Number  of  Users  with  Response  Y:  2 

Number  of  Users  with  Response  N:  6 

Number  of  Users  with  Response  NSF:  4 

Number  of  Users  with  Response  CT:  0 

Data: 


Application 


ADPAC 

FAA 

FOCC 

HAM 

NAVC 

NCDCF 

NEL 

NHCP 

NMCSSC 

RADC 

SAC 

TWA 


Response 

N 

NSF 

Y 
N 
N 

Y 

NSF 

NSF 

N 

NSF 

N 

N 


AFC  Reference:  A  12 


Resolution:  Do  not  adopt  Macro  Facilities. 
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